ich habe folgendes Problem ich suche einen Wert in einem anderen Arbeitsblatt und möchte nachdem dieser Wert gefunden wurde die Spalte unter dem Wert nach "1" suchen , wenn diese auch lokalisiert sind sollen in Abhängigkeit von der Anzahl der "1" Werte links davon ausgegeben werden. Klingt verwirrend ich versuche mal ob ich eine Datei Hochladen kann.
Bevor ich es vergesse den ersten Wert zu suchen in dem anderen Arbeitsblatt habe ich gelöst wie folgt:
Dim Suchkriterium as String
Suchkriterium = Application.InputBox("Geben Sie einen Suchwert ein")
' Selection.Copy
' Sheets("Tabelle 1").Select
' Cells.Find(what:=Suchkriterium, After:=ActiveCell, LookIn:=xlFormulas _
' , lookat:=xlPart, SearchOrder:=xlByRows, Searchdirection:=xlNext, _
' MatchCase:=False, Searchformat:=False).Activate