Im Bericht nach Wechsel zur Seitenansicht per VBA kein Fokus?

24/11/2009 - 18:18 von Kay Gruhl | Report spam
Hallo

Ich sitze hier vor einem "kleinen" Problem.

Ich habe einen Bericht in der normalen Ansicht geöffnet. In diesem Bericht
gibt es einen Button, welcher bei Click() folgendes macht:

Private Sub Button_Click()
DoCmd.OpenReport Me.Report.Name, acViewPreview
End Sub

Die Vorschau öffnet sich, aber ich kann nichts mehr aktivieren bzw
anklicken, als ob der Fokus verloren gegangen ist.

Wenn ich Access (2007) minimiere und wieder maximiere, kann ich normal
weiter arbeiten.

Was geht da schief?

Folgende Variante funktioniert, aber da ist nach dem Schließen der
Vorschau auch leider der Bericht zu:

Private Sub Button_Click()
Dim strTemp As String
strTemp = Me.Report.Name
DoCmd.Close acReport, strTemp
DoCmd.OpenReport strTemp, acViewPreview
End Sub

Gibt es vielleicht eine andere Lösung?

Kay
(bei Antworten per Email muss der Bindestrich aus dem Namen entfernt werden)
 

Lesen sie die antworten

#1 Karl Donaubauer
24/11/2009 - 20:07 | Warnen spam
Kay Gruhl wrote:
...
Ich habe einen Bericht in der normalen Ansicht geöffnet. In diesem
Bericht gibt es einen Button, welcher bei Click() folgendes macht:

Private Sub Button_Click()
DoCmd.OpenReport Me.Report.Name, acViewPreview
End Sub

Die Vorschau öffnet sich, aber ich kann nichts mehr aktivieren bzw
anklicken, als ob der Fokus verloren gegangen ist.

Wenn ich Access (2007) minimiere und wieder maximiere, kann ich normal
weiter arbeiten.

Was geht da schief?



Ich glaube, du hast da einen schönen Bug entdeckt.
Um den Fokus aus dem Nirvana zurückzuholen, muss er
vom Accessfenster weg und wieder zurück. Deshalb klappt
es auch nach dem Minimieren/Maximieren.

Hoffentlich bringt jemand einen schöneren Workaround, denn
das einfachste, was mir auf die Schnelle einfàllt, ist Msgbox & Co,
womit sich natürlich das Problem des Schließens stellt.
Also etwas in der Art:

'(alleschauenkurzweg ;-)
SendKeys "~"
InputBox "Ursuperbericht"

nach deinem OpenReport.

Servus
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com

Ähnliche fragen