Textfelder automatisch aktualisieren

Computer: Software & Programmierung Office Software
1

Hallo zusammen,

das Textfeld im folgenden Code soll sich automatisch aktualisieren, wenn der Wert sich im Feld B5 ändert.

Wie kann man das machen?

THX

Private Sub TextBox4_Change()
TextBox4.Value = Sheets(„Blatt“).[B5]
End Sub

2

Hallo,

über die Ereignissteuerung in Excel-VBA kann man das realisieren.

Private Sub Worksheet\_Change(ByVal Target As Range)
 'prüfen, wurde B5 verändern
 if ... True
 TextBox4.Value = Sheets("Blatt").[B5]
 End If
End Sub

Gruß, Bernd

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

Hallo,

über die Ereignissteuerung in Excel-VBA kann man das
realisieren.

Private Sub Worksheet_Change(ByVal Target As Range)
'prüfen, wurde B5 verändern
if … True
TextBox4.Value = Sheets(„Blatt“).[B5]
End If
End Sub

Gruß, Bernd

Das klingt jetzt vielleicht etwas blöd, aber mit if … True hab’ ich so meine Probleme.

Was gehört da noch programmiert? Mit dem Change bin ich da nicht weitergekommen.

THX

4

das Textfeld im folgenden Code soll sich automatisch
aktualisieren, wenn der Wert sich im Feld B5 ändert.
Private Sub TextBox4_Change()
TextBox4.Value = Sheets(„Blatt“).[B5]
End Sub

Hi Alex,

in Tabelle1:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = „$B$5“ Then TextBox4.Value = Sheets(„Blatt“).[B5]
End Sub

Gruß
Reinhard