Application.Goto
26.08.2023 01:42:10
Andreas
Mit dem CommandButton20155_Click befülle ich im Userform103 die Textbox1049
sowie die TextBox1051. Funktioniert
Markiere ich im Sheets("Auswertung") eine Zeile, wird die aktive Zeilennummer ebenfalls in der
Textbox 1049 wiedergegeben. Funktioniert
Woran es Scheitert---
ich möchte gern zusätzlich in der Textbox1052 eine Zahl eintragen, bzw die vorhandene Überschreiben und beim Klick vom CommandButton20155
zu dieser Zeile springen. Die Zeilennummer am Rand der Tabelle ist identisch mit der Zeilennummer in "Spalte A"
Application.Goto Range("A" & TextBox1052) lautet der Befehl- der mit einem Fehler endet....
Private Sub CommandButton20155_Click()
UserForm103.TextBox1049.Value = UserForm103.TextBox0094
UserForm103.TextBox1051.Value = UserForm103.TextBox0096
'Editiere die derzeit active ZeileA nach UF 103 Textbox 1049
UserForm103.TextBox1049.Value = Cells(ActiveCell.Row, 1)
Application.Goto Range("A" & TextBox1052)
End Sub
LG Andreas