+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak (/konu-accessde-vba-kodu-ile-kapali-excel-dosyasini-yazdirmak.html)
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - accessman - 18/02/2020
Access için 2 satır yetiyor Excel sayfası için yazıcı değiştirmiyordu
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - feraz - 18/02/2020
Exceli açtırınca yani openden sonra Excel aktif yapılacak activevindow gibi bişey olmalı.
Ondan sonra dediğim işlemler yapılacak.müsait olunca denerim kodları.internetten bulmuştum deneyememiştim.
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - ozanakkaya - 18/02/2020
Lütfen Site Kurallarını tekrar gözden geçiriniz. Konu başlığındaki soru cevaplandığı için konu cevaplanmış konular bölümüne taşındı. Konu başlığından farklı sorunuz var ise yeni konu açınız.
(06/07/2009, 23:57)AccessTr.neT yazdı: 1-b) Açtığınız konudaki sorun çözümlenmişse aynı konuya konu başlığındaki soru ile ilgisi olmayan farklı soru yazmayınız. Farklı sorunuz var ise yeni konu açınız.
Ayrıca, lütfen kodlarınızı editördeki VB butonuna tıklayarak ekleyiniz.
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - accessman - 18/02/2020
Sorun çözümlenmeden taşınmış
Vb butonunu bimiyordum ama güzel fikirmiş
Modul dosyası olarak eklemiştim ama taşınırken kaybolmuş
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - ozanakkaya - 18/02/2020
(18/02/2020, 18:25)accessman yazdı: Sorun çözümlenmeden taşınmış
Konu başlığındaki "Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak" sorununun neresi çözülmedi?
Dim xlApp As Excel.Application
Set xlApp = CreateObject("Excel.Application")
xlApp.Visible = True
xlApp.Workbooks.Open "D:\myworkbook.xls", True, False
xlApp.Sheets("SayfaAdıBuraya").Select
xlApp.ActiveSheet.PrintOut
xlApp.Workbooks.Close
xlApp.Quit
Set xlApp = Nothing????
Cvp: Accessde Vba Kodu İle Kapalı Excel Dosyasını Yazdırmak - feraz - 18/02/2020
(18/02/2020, 17:19)feraz yazdı: Application.Dialogs(9).Show
Ozan hocanın koduna göre yukarıdaki kod alttaki gibi yapınca printer seçim ekren çıkıyor.Normal Excel kodlarında kullanmak için yyukarıdaki kod geçerli biz bu şekilde yaptığımız için alttaki gibi olacak.
Kod:
xlApp.Dialogs(9).Show