TARİHE GÖRE KAYIT

[ustaoyuncu]

TARÝHE G�RE KAYIT

sayfadaki tarihe göre kayıt olabilirmi. Ã?rneğin tarih 01.01.2006 ise kitap adı 01.01.2006, tarih 02.01.2006 olduğunda adı 02.01.2006 olacak şekilde kayıt olabilirmi?

 

[zafer]

Merhaba

Kodları modüle yapıştırınız.

Dizin adını kendinize göre uyarlayınız.
Kitaplık adı sayfa1 a1 hücresinden alıyor


Sub dosyaadi()
dizin = "D:\Dosyalar\EXCEL\KITAPLIK\"
kitap = Sheets("sayfa1").Range("a1").Value
ActiveWorkbook.SaveAs Filename:=dizin & kitap & ""
End Sub