Danke!
Beide Versionen funktionieren sehr gut und mir ist damit sehr geholfen!
Wisst ihr eventuell auch wie ich das ganze so hinbekomme wenn eine Zeile markiert ist?
Also Markierte Zeile und (z.B.) A2:E2?
Mein Code sieht momentan so aus:
Columns("A:A").Select
Selection.Find(What:="Schrank €", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Rows(ActiveCell.Row).Select
Range("A2:E2, ActiveCell").Select
Mit Range("A2:E2, ActiveCell").Select bekomme ich immer eine Fehlermeldung
und mit Range("A2:E2", ActiveCell).Select funktioniert es zwar aber es werden immer auch alle Zeilen die Zwischen der ursprünglich markierten und A2:E2 liegen mit markiert.
Gruß
|