farklı kaydet "hücreden günün tarihini dosya adı olarak alabilirmi"

[cemre1970]

Selamlar,

hazırladığım çalışmada her ayın sonunda bakiyeyi devreden sütununa aktaran ve dosyayı yeni çalışılacak ayın tarihiyle farklı kaydedecek bir kod düzenlemesi yapılabilirmi?

yardımlarınız için teşekkürler.

 

[skywalker48]

bende istiyorum, faydalı bişey gibi görünüyor, yardımcı olursanız sevinirm

 

[cemre1970]

çalışmamın son halini ekledim . geliştirmek isteyen arkadaşlar olursa çok makbule geçer. iyi çalışmalar

sayfa koruması kaldırma parolası SUDE dir

 

[Zeki Gürsoy]

.
.
Dim sFileName As String
sFileName = Format(Now + 3, "mmmm_yyyy") + ".xls"
ActiveWorkbook.SaveAs sFileName
.
.

olan kısmı aşağıdaki ile değiştirebilirsiniz..

Dim sFileName As String
sFileName = Format([COLOR=Blue][B]Date[/B][/COLOR], "mmmm_yyyy") + ".xls"
ThisWorkbook.[COLOR=Blue][B]SaveCopyAs[/B][/COLOR] sFileName

 

[cemre1970]

teşekkürler