Hallo zusammen,
ich habe eine Frage zu folgendem Code:
Private Sub CommandButton4_Click()
Dim text
Dim zeile
text = Me.TextBox3.Value
zeile = Application.WorksheetFunction.Match(text, Worksheets(1).Columns(1), 6)
If zeile <> "#N/A" Then Worksheets(1).Cells(zeile, 14) = "Freigegeben"
End Sub
Eigentlich sollte der Wert aus TextBox3 in Tabelle1 , Spalte "F" gefunden werden, und dann in der Zeile in welcher der Wert steht in Spalte "N" der Text "Freigegeben" eingetragen werden.
.Columns(1), 6) diesen Teil verstehe ich nicht ganz.
Kann mir das bitte jemand kurz erklären?
Vielen Dank!
|