ich habe ein kleines Problem. Ich habe eine Userform in eine Excel hinterlegt (siehe Code unten). Sinn dahinter ist, dass ich mit dieser Userform über die Eingabe des Pfades in Textbox1 eine andere Excel datei öffne, welche dann weiterbearbeitet werden soll, indem der Zelleninhalt einer Spalte nach einem bestimmten Wert (hier "Hallo") durchsucht wird und wenn dieser vorhanden ist, soll die gesamte Zeile gelöscht werden. Aber irgendwie steh ich nach langem Überlegen jetzt in einer Sackgasse. Vielleicht kann mir jemand von euch weiterhelfen.
Vielen Dank schonmal im Voraus.
Private Sub CommandButton1_Click()
Dim Pfad_lokal As String
Pfad_lokal = TextBox1.Text ' Pfad aus Textbox lesen
Dim wbZiel As Workbook
Dim wbQuelle As Workbook
Set wbZiel = ThisWorkbook 'Die Mappe, in der der Code liegt
Set wbQuelle = Workbooks.Open(TextBox1.Text)
End Sub
Private Sub CommandButton2_Click()
Dim i As Long
Dim wbQuelle As Workbook
Set wbQuelle = Workbooks.Open(TextBox4.Text)
With wbQuelle.Worksheets("Tabelle1")
For i = Cells(Rows.Count, 4).End(xlUp).Row To 1 Step -1
If Cells(i, 5) = "hallo" Then Rows(i).Delete
Next i
End With
End Sub