Açık excel dosyasını kapatma

[sero52]

Merhaba

Çalışmakta olan herhangi bir programı (örn : excel.exe) makro yazarak nasıl kapatabilirim?

Yardımcı olan herkese şimdiden teşekkürler.

 

[Zeki Gürsoy]

Bunun en kolay yolu kullandığınız harici programa Excel referansını eklemektir.

If Workbooks.Count > 0 Then
    Application.Quit
End If
Shell "excel", vbMaximizedFocus

 

[sero52]

anemos hocam kapatırken dosyayı kaydetmek istiyormusunuz diye bir soru soruyor. Bunu engellemek için ne yapabiliriz.

Application.Quit, False

yazdım hata verdi

 

[quman]

Yukarıdaki kodun başına bu satırı ekleyin. Hiç bir uyarı vermeden kapanacaktır.

Application.DisplayAlerts = False

İyi çalışmalar.

 

[emrexcel123]

Yukarıdaki kodun başına bu satırı ekleyin. Hiç bir uyarı vermeden kapanacaktır.
Application.DisplayAlerts = False
İyi çalışmalar.

bu şekilde uygulamayı kaydetmeden kapatır ya da hiç kapatmaz eğer uyarı istemiyorsanız şu kodu kullanın
ActiveWorkbook.Save
Application.Quit, False şeklinde deneyin...

 

[quman]

Düzeltmeniz için teşekkür ederim Sn. emrexcel123.