Mit VBA Tabellensprung
16.11.2022 12:30:40
Mersed
ich komme gerade nicht weiter, hoffentlich könnt Ihr mir helfen.
Ich möchte z.b. auf Tabelle1 In Zelle A1 123456 eingeben, per Enter bestätigen und soll dann in Tabelle2 auf Zelle C4 springen.
Habe diesen Code gebastelt:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Taet, Range(A1)) Is Nothing Then Exit Sub
Application.EnableEvents = False
Cancel = True
eingabe = Target.Value
If eingabe = 123456 Then
** Target.Offset(0, 0).Select**
** Target.Value = **
** Sheets(Tabelle2).Select**
**End If
**Application.EnableEvents = True
**End Sub
Bitte um Hilfe.
Grüße
Mersed
Anzeige