Makro ile Kaydederken Dosya Adlarından Eğik Çizgileri Kaldırın - Excel İpuçları

Deepak soruyor:

Merhaba, A38'i kullanarak geçerli tarihi bir hücreye =NOW()atamaya ve ardından bu hücrenin içeriğini kaydedilen dosyanın dosya adı olarak atayarak bir SaveAs yapmaya çalışıyorum . Bunun için doğru kodu yazamıyorum.

ChDir "C:Backup" ActiveWorkbook.SaveAs Filename: = Range("A38").Text, FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

Yukarıda belirtilen kodda tek yapmam gereken, dosya adını her zaman geçerli tarihi içerecek olan A38 hücresinin içeriğiyle değiştirmektir. Bu kodu yazmanın doğru yolunu bana bildirirseniz sevinirim. Dosya adını, www.mrexcel.com'da tip025'e bakarak birkaç şeyle değiştirmeye çalıştım ama işe yaramadı.

Tarih formatı "/" karakterini içerdiğinde sorun ortaya çıkar… aşağıdakileri deneyin:

ActiveWorkbook.SaveAs Application.Substitute(Range(“A38”).Text,”/”,”-“)