Hallo zusammen,
ich verzweifle gerade an einem vermutlich simplen Problem: Ich möchte 2 Formulare gleichzeitig anzeigen, so dass das zweite geöffnete Formular am Monitor über dem anderen hin- und herbewegt werden kann.
Zurzeit öffne ich mit
docmd.OpenForm ...
docmd.maximize
das erste Formular
Dann wird ebenfalls mit
docmd.openForm ...
das zweite Formular geöffnet. Obwohl das zweite Formular deutlich kleiner ist als das erste, wird es immer maximiert geöffnet und verdeckt das erste Formular komplett.
Wie erreiche ich, dass das zweite Formular in seiner von mir festgelegten Größe geöffnet wird und es optimaler Weise auch sichtbar bleibt, wenn das hintere Formular angeklickt wird, um in ihm zu scrollen?
Vielen Dank im Voraus!
Gruß
Heiko
Hallo Heiko,
das 2. Formular als PopUp-Formular und
Private Sub Form_Open(Cancel As Integer)
DoCmd.MoveSize 40, 40, 10000, 9000 '---> Right, Down, Width, Height
...
End Sub
Gruß Oma
Hallo Oma,
das funktioniert bei mir nicht, so sieht der Code aus:
DoCmd.OpenForm "frm_Homepage_planung"
DoCmd.MoveSize 40, 40, 10206, 11907 '---> Right, Down, Width, Height
Set frm = Forms!frm_Homepage_Planung
frm!ueberschrift = "Ausgewählte KW: " & plan_kw & " / " & plan_jahr
frm!kw = plan_kw
frm!jahr = plan_jahr
...
nach den ... kommen nur noch ein paar Wertzuweisungen an Formularfelder. Das erste Formular ist zu dem Zeitpunkt bereits geöffnet. frm_Homepage_planung ist das zweite Formular und öffnet sich trotz des movesize im Vollbild. ???
Hast Du noch eine Idee woran das liegen kann, evtl. an einer Formulareigenschaft. Gesetzt habeich folgende:
autom. zentieren --> nein
größe anpasse --> nein
an bildschirmgröße anpassen --> nein
Rahmenart = Dialog
Gruß
Heiko
Hallo Heiko,
du musst auch das Formular-Ereignis: "Beim Öffnen! benutzen!
So wie ich geschrieben habe:
Private Sub Form_Open(Cancel As Integer)
DoCmd.MoveSize 40, 40, 10000, 9000 'bzw Deine Werte!
...
End Sub
Gruß Oma
.. wer lesen kann, ist eindeutig im Vorteil!
Jetzt läufts, vielen Dank.
Gruß
Heiko