ERKANDA RAPOR ÖNİZLEME GÖZÜKMÜYOR
#1
Access belgemde bir forma rapor önizleme_ac komutuna tıkladığımda rapor önizleme açılıyor

fakat sorunum şu ki ben acces pencersini gizlemek için aşağıdaki kodları yazdım ve bunun sonucunda benim form'um bir sonraki sefere açıldığında rapor_önizleme dediğimde raporum ekranda değilde benim gizlemiş olduğum access penceresinde açılıyor rapor sayfasının özelliklerini acılan ve kalıcı evet olarak gözüküyor bu problemi nasıl halledebiliriz yardımlarınızı bekliyorum ?

Private Sub R_ONİZLE_Click()

On Error GoTo Err_R_ONİZLE_Click

Dim stDocName As String

stDocName = "YAZDIR-GELİR"
DoCmd.OpenReport stDocName, acPreview

Exit_R_ONİZLE_Click:
Exit Sub

Err_R_ONİZLE_Click:
MsgBox Err.Description
Resume Exit_R_ONİZLE_Click
End Sub

bir modül içerisinde şu kodlar yazılı :

------------------------------------

Option Explicit

Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3

Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long

Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
On Error Resume Next
Set loForm = Screen.ActiveForm
If Err <> 0 Then
If nCmdShow = SW_HIDE Then
loX = apiShowWindow(hWndAccessApp, nCmdShow)
Err.Clear
End If
Else

loX = apiShowWindow(hWndAccessApp, nCmdShow)

End If
fSetAccessWindow = (loX <> 0)
End Function

----------------------------



  Alıntı
Bu mesajı beğenenler:
#2
Form açılma olay yordamında ki docmd.maximize satirini, rapor açılma olay yordamına taşıyın.
Rapor gösterilme seçeneği yazdırma görünümü olarak ayarlayın.



  Alıntı
Bu mesajı beğenenler:
#3
Merhaba. Aynı hata bendede var. Dediklerinizi yapıyorum fakat şift tuşu ile açtığımda rapor açılıyor tam ekran olarak ama pencere gizliyken açtığımda OpenReport Eylemi iptal edildi hatası alıyorum. Yardımcı olabilir misiniz?



  Alıntı
Bu mesajı beğenenler:
#4
(14-08-2023, 19:25)mustafa.sogutlu demiş ki: Merhaba. Aynı hata bendede var. Dediklerinizi yapıyorum fakat şift tuşu ile açtığımda rapor açılıyor tam ekran olarak ama pencere gizliyken açtığımda OpenReport Eylemi iptal edildi hatası alıyorum. Yardımcı olabilir misiniz?

Raporu acma satirini
Visual Basic
  1. DoCmd.OpenReport stDocName, acPreview, , , acWindowNormal


gibi degistirin

Rapor acilma olay yordamina docmd.maximize yazin



  Alıntı
Bu mesajı beğenenler:
#5
Merhaba;
Aynen dediğiniz gibi yaptım. şift tuşu ile açtığımda rapor açılıyor fakat pencere gizleme aktifken OpenReport Eylemi iptal edildi hatası veriyor yine.

rapor açılma kodu

On Error GoTo Err_sozlesmeyazdir_Click

DoCmd.OpenReport "SOZLESME_VAE_BR", acPreview, , , acWindowNormal

Exit_sozlesmeyazdir_Click:

    Exit Sub

Err_sozlesmeyazdir_Click:

    MsgBox Err.Description
    Resume Exit_sozlesmeyazdir_Click


Rapor açıldığında kodu
docmd.maximize



  Alıntı
Bu mesajı beğenenler:
#6
(17-08-2023, 09:29)mustafa.sogutlu demiş ki: Aynen dediğiniz gibi yaptım. şift tuşu ile açtığımda rapor açılıyor fakat pencere gizleme aktifken OpenReport Eyl[color=#666666]emi iptal edildi hatası veriyor yine.

Rapor içindeki kodlar ve eylem hatası olduğundan, olaylara bakmalı. Bir başka access dosyasında ayni hatayı almakta misiniz? Uygulamanızda tek rapor mu var? Diğerlerinde de ayni hata gerçekleşiyor mu?

Örnek eklenirse bakılır.

docmd.maximize
satırından sonra

odaklanmak için
DoCmd.SelectObject acReport, "Rapor Adi", True

yazılabilir.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Rapor üzerinde önizleme öncesi Etiket Ve Metin Kutularının Yerlerini Değiştirme Hk. adnnfrm 4 153 26-12-2023, 03:42
Son Mesaj: adnnfrm
  [VBA] Alt Rapor Içeren Bir Rapor Her Personel Için Ayrı Excel Sayfasına Atılabilir Mi? abkbek 12 515 29-01-2023, 13:29
Son Mesaj: abkbek
  [RAPOR] Rapor Alt Bilgisinde Rapor Alanındaki Satır Sayısını Gösterme bobili 6 335 23-02-2022, 13:37
Son Mesaj: bobili
  [RAPOR] Pdf,Xps, önizleme Ahmet51 4 549 07-02-2020, 08:23
Son Mesaj: Ahmet51
  [RAPOR] Raporları Baskı önizleme Ve Yazdırma (birden çok) sefersanli 1 530 15-11-2019, 23:42
Son Mesaj: sefersanli
  [RAPOR] rapor ekranında iki rapor kayaae 3 996 15-03-2019, 13:37
Son Mesaj: kayaae
  [RAPOR] Önce rapor önizleme sonra yazdırma ayarları ve sonra yazdırma yapmak. axionvb 1 1.065 26-03-2018, 15:18
Son Mesaj: dayday
  [RAPOR] access rapor bazı veriler gözükmüyor onury 1 1.062 07-11-2017, 15:50
Son Mesaj: onur_can

Foruma Git:


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