Ich brauche einmal Hilfe!
Folgender Code öffnet mir durch Doppelklick in Spalte A des Tabellenblattes die Userform5.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, [A:A]) Is Nothing Then
Userform5.Show
Cancel = True
End If
End Sub
Die UserForm öffnet sich auch!und nun möchte ich mit der Initialisierung der UF Werte in die Textbox1 einlesen.
Private Sub UserForm_Initialize()
TextBox1.ControlSource = ActiveCell.Address 'geht
'TextBox1.ControlSource = Range("C" & Target.Row).Address ' Geht nicht
'Userform5.TextBox1 = Sheets("Budget").Range("C" & Target.Row) 'Geht nicht
'Me.TextBox1 = Range("C" & Target.Row) 'Geht nicht
End Sub
Mit ActiveCell.Adress geht es! Das ist aber der Wert aus Spalte A der entsprechenden Reihe.Ich brauche aber den Wert aus Spalte C der entsprechenden Reihe!
Meine Versuche sind oben im Code zu sehen und mit 'Geht nicht bezeichnet! Fehlermeldung "Objekt erforderlich!
Mit meiner Recherche bin ich leider nicht weiter gekommen.
Wer kann mir da mit Code oder einem link zu einem Rechercheergebnis weiter helfen.
Gruß
Thorsten