Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Bei Eintragung UserForm mit aktualisierten Werten anzeigen

Gruppe

Change

Problem

Wie kann ich bei Einträgen in Spalte A eine UserForm aufrufen, in der in einer ListBox die aktualisierten Werte angezeigt werden?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
   If Target.Column <> 1 Then Exit Sub
   With frmAutomatic
      .lstAutomatic.List = Range("A1").CurrentRegion.Value
      .Show
   End With
End Sub

ClassModule: frmAutomatic

Private Sub cmdWeiter_Click()
   Unload Me
End Sub