Zellen auslesen (VBA)
04.03.2020 09:00:11
Herbert
ich hatte schon eine funktionierende Speicherfunktion, nun habe ich aber gemacht das der Name des anwenders per Active Directory ausgelesen wird. Jetzt bekomme ich aber immer bei diesem Code:
Private Sub CommandButton3_Click()
Dim CBoxTxt As String, findRow As Long
CBoxTxt = TextBox_Name.Text
findRow = Range(TextBox_Namen_Zelle.Value).Row
If Cells(findRow, 29) = CBoxTxt And _
Cells(findRow, "AC") = CBoxTxt Then
If MsgBox("Soll der Dateipfad von " & CBoxTxt & " wirklich geändert werden?", vbYesNo) = _
vbNo Then Exit Sub
Cells(findRow, 30) = (TextBox_Achsbild)
Cells(findRow, 31) = (TextBox_Achsbild_Adapter)
End If
Unload Me
Ab der Stelle in der dritten Zeile also "findRow = Range(TextBox_Namen_Zelle.Value).Row und darauf folgenden Zeilen" den Laufzeitfehler 1004, könnte mir wer erklären warum und wie ich den weg bekomme?
vielen Dank im Voraus,
LG Herbert!
Anzeige