In VBA (Visual Basic for Applications) können Sie das `Resize`-Ereignis verwenden, um Aktionen auszuführen, wenn die Größe eines Formulars oder eines Controls geändert wird. Dieses Ereignis wird häufig in Formularen in Microsoft Access oder Excel-Anwendungen verwendet. Im Folgenden zeige ich Ihnen, wie Sie das `Resize`-Ereignis in einem Formular in Microsoft Access verwenden können.

Schritt-für-Schritt-Anleitung:

   Private Sub Form_Resize()
       MsgBox "Das Formular wurde in der Größe verändert."
   End Sub

• Öffnen Sie das VBA-Editor-Fenster:
• Öffnen Sie Ihre Access-Datenbank.
• Drücken Sie `ALT` + `F11`, um den VBA-Editor zu öffnen.
• Wählen Sie das Formular aus:
• Suchen Sie im Projekt-Explorer auf der linken Seite den Abschnitt „Formulare“.
• Doppelklicken Sie auf das Formular, für das Sie das `Resize`-Ereignis konfigurieren möchten.
• Erstellen Sie das Resize-Ereignis:
• Im VBA-Editor sehen Sie oben eine Dropdown-Liste mit Ihren Formular-Elementen.
• Wählen Sie in der linken Dropdown-Liste `(Form)` oder den Namen Ihres Formulars.
• Wählen Sie in der rechten Dropdown-Liste `Resize` aus.
• Code schreiben:
• Fügen Sie den gewünschten VBA-Code in das `Form_Resize`-Ereignis ein. Hier ist ein einfaches Beispiel, das eine Nachricht ausgibt, wenn das Formular seine Größe ändert:

Beispielanwendung:

Angenommen, Sie möchten einige Steuerelemente auf Ihrem Formular neu positionieren oder die Größe ändern, wenn das Formular selbst seine Größe ändert. Hier ist ein Beispiel, das zeigt, wie Sie ein Steuerelement namens `MeinLabel` dynamisch anpassen können:

Private Sub Form_Resize()
    ' Beispiel: Ändert die Breite eines Labels entsprechend der neuen Formularbreite
    On Error Resume Next
    Me.MeinLabel.Width = Me.InsideWidth - 20
    Me.MeinLabel.Height = 50
    On Error GoTo 0
End Sub

Hinweise:

• Stellen Sie sicher, dass alle benutzten Steuerelemente auf dem Formular existieren.
• Passen Sie die Eigenschaften wie `Width`, `Height`, `Top` und `Left` gemäß Ihrer Bedürfnisse an.

Mit diesem Wissen können Sie das Resize-Ereignis nutzen, um das Layout dynamisch anzupassen und ein reaktionsfähigeres Benutzererlebnis zu schaffen.

Follow us on Social Media

facebooklinkedin

Unlock Your Potential

Excel

Access

Power BI

Help us grow the project