Çalışma Kitabını Farklı kaydederken

[fikrepfiki]

Arkadaşlar

butona bastğımda dosyayı farklı kaydedecek ama bana bir excel sayfasında saveas yaptığımızda açılan pencereden çıkarsın.

yardımcı olursanız sevinirim.

 

[trigger]

Aşağıdakini dene:

Sub Button1_Click()

farklikaydet = Application.GetSaveAsFilename( _
fileFilter:="Microsoft Excel Files (*.xls), *.xls")

ActiveWorkbook.SaveAs Filename:=farklikaydet

End Sub

Umarım soruyu doğru anlamışım

 

[fikrepfiki]

Teşekkür ederim,istediğim gibi oldu.