Hi zusammen :)
ich habe folgendes Problem:
(1) Ich möchte in Zeile A nach dem Wort "Prio" suchen. Die Spalte soll dann zurückgegeben werden,
(2) sodass ich im nächsten Schritt aus dieser Spalte die letzte Zelle finden kann.
Problem (2) habe ich gelöst, nur soll "B1" eben ersetzt werden, falls "Prio" nicht in B1 steht sondern in einer anderen Spalte.
Dim lastcell As Range
Dim r As Long
Set lastcell = ActiveSheet.Range("B1").End(xlDown)
r = lastcell.Row
Ich freue mich, über jede Hilfe!
LG jama123
|