Hallo Gemeinde,
brauch mal wieder Hilfe.
Erst lasse ich in Spalte B ein bestimmtes Wort suchen. Wie ich an Row und Column komme habe ich auch schon raus.
x = Tabelle1.Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To x
If Tabelle1.Cells(i, 1) = Label_Vorgabe Then
LabelAusgabe = Tabelle1.Cells(i, 2).Columns
LabelTest = Tabelle1.Cells(i, 2).Row & " " & Tabelle1.Cells(i, 2).Column
End If
Next
Jetzt mein Problem: Ich möchte den Wert in der danebenliegen Zelle (Spalte C) um eins erhöhen.
Beispiel: Wort wird in B10 gefunden. Also soll in C10 der Wert um +1 erhöht werden
Aber wie?
|