Dosyayı Farklı Kaydet - kaydet - kopya oluştur

17/03/2017, 18:50

husem

merhaba
mevcut Excel dosyasını butona tıkayınca günün tarih ve saatiyle Excel dosya formatıyla belirtilen klasöre nasıl kayıt yapabiliriz acaba?

iyi çalışmalar, kolay gelsin.
17/03/2017, 19:50

atoz112

sayın husem,

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
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")