Rapor açıldığında,Yazdır penceresinin kendiliğinden açılması.
#1
Merhaba;

Bir raporu açtığımızda (sağ klik > yazdır seçeneği ile açtığımız) YAZDIR penceresinin kendiliğinden (otomatik olarak) açılması için Raporun, açıldığında, etkinleştiğinde olay yordamın nasıl bir kod yazmalıyız?

Şimdiden teşekkürler.



  Alıntı
Bu mesajı beğenenler:
#2
rapor aç komutu
ve ardından rapor dialog penceresi
DoCmd.RunCommand acCmdPrint
iyi çalışmalar
Teşekküre gerek yok, Taş atın yeter!!!



  Alıntı
Bu mesajı beğenenler:
#3
Sayın Adnan Hocam;

Visual Basic
  1. Private Sub Report_Open(Cancel As Integer)
  2. DoCmd.Maximize
  3. RunCommand acCmdPrint
  4. End Sub


Şeklinda yazdım. Fakat;Rapor gözükmüyor, rapor çerçevesi ve sadece yazdır menüsü çıkıyor.
Amacım: Önce rapor açılsın, ardından Yazdır penceresi açılsın idi.

Visual Basic
  1. Private Sub Report_Open(Cancel As Integer)
  2. DoCmd.RunCommand acCmdPrint
  3. End Sub


şeklinde yazdım. Yine aynı.

Formun rapor aç komut düğmesine yazdığımda ise, yazdır penceresi ve raporun beyaz kısmı çıkıyor. Yani Raporu göremiyoruz ki, yazdıralım.

Selamlar.



  Alıntı
Bu mesajı beğenenler:
#4
raporu bir komut düğmesi ile açmıyormusunuz.
İşte açtığınız düğmenin alt sırasına ekleyin rapora EKLEMEYİN
docmd.openreport "a" acpreview den sonra
DoCmd.RunCommand acCmdPrint
komutunu yazın
Teşekküre gerek yok, Taş atın yeter!!!



  Alıntı
Bu mesajı beğenenler:
#5
Sayın Adnan bey;

Dediğiniz gibi yaptım.
Formun rapor aç komut düğmesine yazdığımda ise, yazdır penceresi ve raporun beyaz kısmı çıkıyor. Yani Raporu göremiyoruz ki, yazdıralım.

Önce rapor bir görünsün, hemen akabinde yazdır penceresi çıkması dahai iyi olurdu.

Teşekkürler.



  Alıntı
Bu mesajı beğenenler:
#6
Tam kod şöyle;

Visual Basic
  1. Private Sub Komut67_Click()
  2. On Error GoTo Err_Komut67_Click
  3.  
  4. Dim stDocName As String
  5.  
  6. stDocName = "AVUKATLAR"
  7. DoCmd.OpenReport stDocName, acPreview
  8. DoCmd.RunCommand acCmdPrint
  9.  
  10.  
  11. Exit_Komut67_Click:
  12. Exit Sub
  13.  
  14. Err_Komut67_Click:
  15. MsgBox Err.Description
  16. Resume Exit_Komut67_Click
  17.  
  18.  
  19. End Sub





  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
access-sql-18 Sorgu Kapatınca Formun Açılması burhanb 1 318 18-11-2023, 00:44
Son Mesaj: dsezgin
  [MAKRO] Access programı ilk açıldığında güvenlik ayarı yaptırmak bibib 7 2.241 09-11-2023, 01:54
Son Mesaj: BeyTor
  [FORM] Gizlenen Access'in Açılması Fatih Sipahi 6 1.453 09-08-2023, 10:43
Son Mesaj: mustafa.sogutlu
  [VBA] Alt Rapor Içeren Bir Rapor Her Personel Için Ayrı Excel Sayfasına Atılabilir Mi? abkbek 12 1.357 29-01-2023, 13:29
Son Mesaj: abkbek
  Form Açıldığında Ekran Boyutunda Otomatik Olarak Ayarlama kursun 2 472 08-12-2022, 19:08
Son Mesaj: kursun
  [RAPOR] Rapor Alt Bilgisinde Rapor Alanındaki Satır Sayısını Gösterme bobili 6 798 23-02-2022, 13:37
Son Mesaj: bobili
  [FORM] Sadece Belirlenen Formun Açılması husem 6 836 14-06-2021, 15:07
Son Mesaj: ebadi
  [SORGU] Sorgu(sql) Kendiliğinden Siliniyor Ahmet51 19 1.977 24-09-2019, 22:15
Son Mesaj: Ahmet51

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 3 Ziyaretçi