17/03/2017, 18:50
Dosyayı Farklı Kaydet - kaydet - kopya oluştur
17/03/2017, 19:50
atoz112
sayın husem,
bahsettiğiniz talebinize yönelik olarak;
ya da
veyahut da
benzeri kod satırlarını kullanmak sureti ile deneyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
bahsettiğiniz talebinize yönelik olarak;
ActiveWorkbook.SaveAs Filename:= "dosya_yolu_adi" & "\" & dosya_adi & "_" & Format(Now, "yyyy-mm-dd H-mm") & ".xlsx"
ya da
ActiveWorkbook.SaveAs ("dosya_yolu_adi" & "\" & dosya_adi & "_" & Format(Now(), “DD-MMM-YYYY”) & “.xlsx”)
veyahut da
ActiveWorkbook.SaveAs Filename:= Application.ActiveWorkbook.Path & "\" & dosya_adi & "_" & Format(Now(), "yyy_mm_dd_hh_mm" & ".xlsx")
benzeri kod satırlarını kullanmak sureti ile deneyebilirsiniz.
bilginize...iyi çalışmalar,saygılar.
18/03/2017, 00:34
husem
Sn atoz112,
teşekkür ederim,
ayrıca forumda arama yaparken bazılarının faydalanabilmesi için eklemekte fayda gördüklerim:
mevcut dosyayı kopyalamadan yada farklı kaydetmeden önce kaydetmek istersek
belirlediğimiz klasöre kopya oluşturmak için
teşekkür ederim,
ayrıca forumda arama yaparken bazılarının faydalanabilmesi için eklemekte fayda gördüklerim:
mevcut dosyayı kopyalamadan yada farklı kaydetmeden önce kaydetmek istersek
ActiveWorkbook.Save
belirlediğimiz klasöre kopya oluşturmak için
ActiveWorkbook.SaveCopyAs Filename:= Application.ActiveWorkbook.Path & "\" & dosya_adi & "_" & Format(Now(), "yyy_mm_dd_hh_mm" & ".xls")