Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Zelle aktivieren





Frage

Hallo, ich moechte eine Spalte nach einem Begriff durchsuchen und diese Zelle dann aktivieren, um von dort aus weiterzugehen. Bsp.: Suchbegriff Ball Dieser steht in Zelle A10. Ich markiere die Spalte A und suche nach dem Begriff. Wenn ich dann die Tasten [Strg]+PfeilRunter betaetige, komme ich in der naechsten gefuellten Zelle unter dem Feld Ball raus. Solange ich das manuell ausfuehre, ist es egal, ob ueber der Zelle Ball noch etwas steht oder nicht. Wenn ich das aber mit einem Makro mache und ueber der Zelle Ball etwas steht, dann komme ich in dern naechsten gefuellten Zelle unter dem obersten gefuellten Feld raus. Der Quellcode sieht so aus: [code]Columns("A:A").Select Selection.Find(What:="Ball", After:=ActiveCell, LookIn:=xlFormulas _ , LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=True).Activate Selection.End(xlDown).Select[/code] Kann mir jemand sagen, wie ich das Problem beheben oder umgehen kann? Schon mal Danke im Voraus fuer Eure Antworten. Gruss, Phlip

Antwort 1 von Aliba

Hi Phlip,

das Problem scheint hier zu sein, dass die Spaltenselektion nicht aufgehoben wird und somit

Selection.End(xlDown).Select

in A1 beginnt und dann die erste logische Tabellenreiheunterbrechung gefunden wird.

Füge mal in dem Code nach Activate ein:
ActiveCell.Select

Dadurch wird die Spaltenselektion aufgehoben und die aktive Zelle selectiert.

CU Aliba

Antwort 2 von Phlip

Danke, Aliba.

Jetzt funktioniert's.