dosyayı tarih ve sıra no vererek açma ve kaydetme

Katılım
10 Şubat 2009
Mesajlar
283
Excel Vers. ve Dili
Office 2013 türkçe
Ek dosyamda ve aşağıda açıklamaya çalıştım.Umarım anlatabilmişimdir.

Dosyam açılırken ( buton ile olursa çok daha güzel olur ) tarih ve sıra no vererek açılmasını istiyorum aynı zamanda bu tarih ve sıra no ile kaydetmek istiyorum.( aynı tarih ve sıra no verilemesin ) ilgilenen arkadaşlara şimdiden çok teşekkürler.
 

Ekli dosyalar

Katılım
10 Şubat 2009
Mesajlar
283
Excel Vers. ve Dili
Office 2013 türkçe
Bu makro konusunda ardım edecek arkadaş yokmu ?
 
Katılım
10 Şubat 2009
Mesajlar
283
Excel Vers. ve Dili
Office 2013 türkçe
Excel dosyamı açarken userform ile isim vererek dosyayı kaydetmek istiyorum.Yardımcı olacak yada elinde örnek dosya olan arkadaş varmı ?
 

GursoyC

Altın Üye
Katılım
7 Ocak 2015
Mesajlar
526
Excel Vers. ve Dili
2016 Türkçe
>Dosyam açılırken ( buton ile olursa çok daha güzel olur ) tarih ve sıra no vererek açılmasını istiyorum

Bu cümleyi açıklar mısınız?

Dosyayı bugün tarihli kaydetmek için gerekli kod şudur; bir düğmeye atayabilirsiniz.

Kod:
Dim yol As String, _
        Tar As String
        yol = ThisWorkbook.Path & Application.PathSeparator
    Tar = Format(Date, "yyyymmdd")
   
    ActiveWorkbook.SaveAs Filename:=yol & Tar & ".xlsm", FileFormat:= _
        xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
 
Katılım
10 Şubat 2009
Mesajlar
283
Excel Vers. ve Dili
Office 2013 türkçe
Merhaba unlimitted
User form ile her açtığında tarih vererek dosyamı açmak ve aynı tarih ile kaydetmek istemiştim.
 
Üst