Caption aus Zelle übernehmen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm Label
Bild

Betrifft: Caption aus Zelle übernehmen von: Markus Stein
Geschrieben am: 17.02.2005 21:21:17

Caption aus Zelle übernehmen
Kurze Frage.
Ich möchte in einer Userform die 'Caption' für ein Bezeichnungs-Feld aus einer Tabellenzelle übernehmen. (Bei Änderung dieser Zelle soll sich automatisch auch die Bezeichnung ändern)
Geht das, und wenn ja wie?

Vielen dank
Markus

Bild


Betrifft: AW: Caption aus Zelle übernehmen von: Ulf
Geschrieben am: 17.02.2005 21:40:28

Ins Modul der Tabell:


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "A1" Then
  If UserForm1.Visible Then UserForm1.Label1 = [a1]
End If
End Sub


Ins Modul des userforms:


Private Sub UserForm_Activate()
Label1 = Sheets("Tabelle1").[a1]
End Sub


Ulf


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zahlenformate heraussuchen"