Wie nutze ich per VBA die neuen modernen Steuerelemente?

Die Benutzeroberfläche von Access-Anwendungen hat sich in den letzten Jahren nur langsam verändert. Viele Entwickler:innen nutzen seit Jahrzehnten dieselben Standard-Steuerelemente wie Textfelder, Kombinationsfelder oder Schaltflächen. Doch mit den neuen Modernen Steuerelementen, die Microsoft schrittweise in Access 365 integriert, eröffnen sich neue Möglichkeiten für eine professionellere und ansprechendere Gestaltung – inklusive besserer Touch-Unterstützung und responsiver UI.

Besonders spannend: Viele dieser Steuerelemente sind nativ VBA-kompatibel. Das bedeutet, Du kannst sie wie gewohnt per Code steuern, auslesen und befüllen – nur eben mit einem zeitgemäßen Look.

Was sind „moderne Steuerelemente“?

Microsoft Access 365 (ab ca. Version 2203) bietet eine neue Auswahl an modern UI Controls, die in Access-Formularen verwendet werden können. Dazu zählen u. a.:

• Toggle-Schalter (Ein/Aus)
• Date Picker mit Kalender-Popup
• Modernes Kombinationsfeld (Dropdown)
• Etiketten mit Web-Font-Unterstützung
• Fortschrittsanzeige (Progress Ring)
• Horizontale/vertikale Stack-Layouts (noch experimentell)

Diese Steuerelemente sind direkt im Formularentwurf verfügbar, sobald Access im modern UI Modus betrieben wird (meist Office 365, mit aktiviertem modernem Design).

Vorteile moderner Steuerelemente

• Schlanker, klarer Look – passend zur Office-Oberfläche
• Bessere Barrierefreiheit (Farben, Kontraste, Schrift)
• Nativ touchfähig
• Unterstützung für Web-Farben und moderne Icons
• Reduzierte Ladezeiten bei großen Formularen

Und das Beste: Du kannst sie direkt mit VBA ansprechen.

Beispiel 1: Toggle-Schalter per VBA auslesen und setzen

Toggle-Schalter („Ein/Aus“) ersetzen klassische Kontrollkästchen und sehen dabei deutlich moderner aus.

Beispielsteuerung:

Private Sub Form_Load()
    ' Toggle "Aktiv" standardmäßig auf EIN
    Me.toggleAktiv.Value = True
End Sub

Private Sub toggleAktiv_AfterUpdate()
    If Me.toggleAktiv.Value Then
        MsgBox "Datensatz ist aktiv."
    Else
        MsgBox "Datensatz ist inaktiv."
    End If
End Sub

Hinweis: Der Steuerelementtyp ist ToggleButton (modern UI).

Beispiel 2: Modernes Kombinationsfeld dynamisch befüllen

Das moderne Kombinationsfeld sieht aus wie ein klassisches Dropdown – ist aber schlanker, reaktionsschneller und stabiler.

Private Sub Form_Load()
    With Me.cboStatus
        .RowSourceType = "Value List"
        .RowSource = "Offen;In Bearbeitung;Erledigt;Storniert"
        .Value = "Offen"
    End With
End Sub

Auch Events wie AfterUpdate funktionieren wie gewohnt:

Private Sub cboStatus_AfterUpdate()
    MsgBox "Neuer Status: " & Me.cboStatus.Value
End Sub

Beispiel 3: Modernen Kalender öffnen (Date Picker)

Das moderne Datumsauswahlfeld bietet ein Touch-optimiertes Kalender-Popup mit verbesserter Lesbarkeit.

Private Sub Form_Load()
    Me.datumGeburt.Value = Date
End Sub

Private Sub datumGeburt_AfterUpdate()
    MsgBox "Geburtstag geändert auf: " & Format(Me.datumGeburt.Value, "dd.mm.yyyy")
End Sub

Auch hier erfolgt die Interaktion exakt wie bei einem klassischen Textfeld mit Datumsformat – nur die Darstellung ist moderner.

Beispiel 4: Fortschrittsanzeige mit Progress Ring

Access 365 unterstützt eine moderne Fortschrittsanzeige, die Du wie folgt ansprechen kannst:

Public Sub LadevorgangSimulieren()
    Dim i As Integer
    For i = 0 To 100 Step 10
        Me.ringLadevorgang.Value = i
        DoEvents
        Pause 0.2
    Next i
    MsgBox "Vorgang abgeschlossen."
End Sub

Private Sub Pause(sekunden As Double)
    Dim t As Double
    t = Timer
    Do While Timer < t + sekunden
        DoEvents
    Loop
End Sub

Hinweis: Der Ring zeigt den Fortschritt visuell an – perfekt für längere Hintergrundaktionen.

Beispiel 5: Farben und Symbole in modernen Schaltflächen

Moderne Buttons können Farbhintergründe, Hover-Zustände und sogar Web-Icons darstellen:

Private Sub btnSpeichern_Click()
    Me.btnSpeichern.BackColor = RGB(0, 122, 204)  ' Modernes Blau
    Me.btnSpeichern.ForeColor = RGB(255, 255, 255)
    MsgBox "Gespeichert!"
End Sub

Auch .Picture-Eigenschaften können verwendet werden – oder Du nutzt SVG-Dateien, wenn unterstützt.

Voraussetzungen

• Microsoft Access 365 (empfohlen: aktuelle Version mit modern UI aktiviert)
• Formular im Layout- oder Entwurfsmodus öffnen, um moderne Steuerelemente hinzuzufügen
• VBA funktioniert wie gewohnt – keine neuen Objekttypen erforderlich
• In der Regel brauchst Du keine Verweise oder Bibliotheken – alle Elemente sind native Office-Komponenten

Fazit

Die modernen Steuerelemente machen Access-Formulare benutzerfreundlicher, aufgeräumter und zukunftssicherer – ohne dass Du Deine Anwendung neu erfinden musst. Das Beste: Du kannst sie wie gewohnt per VBA ansprechen. So kombinierst Du moderne Optik mit bewährter Automatisierung.

Wenn Du Deine Anwendung visuell auffrischen oder die Benutzererfahrung verbessern möchtest, sind die modernen UI-Elemente ein idealer Einstieg.

Du willst eine moderne Benutzeroberfläche entwickeln oder Access in eine moderne Business-App verwandeln? Dann unterstütze ich Dich gern bei Konzeption, Umgestaltung oder Performance-Tuning.

🐑 Datenschäfer – Auswertung, Analyse und Automatisierung für KMU im Norden
📧 Kontakt über sesoft.de | 🖥️ Access · VBA · UI/UX · Modernisierung · Power Platform