Herbers Excel-Forum - das Archiv
2 Zeilen runter
Betrifft: 2 Zeilen runter
von: Erwin
Geschrieben am: 20.11.2003 09:36:59
Hallo Leute,
besteht die Möglichkeit, die aktive Zelle 2 Zeilen nach unten zu bewegen, wenn ich meinen Suchbegriff gefunden habe?
Irgendwie landet er überall, nur nicht 2 Zeilen drunter.
Schönen Gruß
Erwin
Sub Such()
Dim C As Range
Set C = Range("3:3").Find(What:="Gruppen", Lookat:=xlWhole)
C.Select
On Error Resume Next
With ActiveCell
Range(.Offset(0, 1), .Offset(0, 1)).Select
End With
End Sub
Betrifft: ActiveCell.Offset(2, 0).Select
von: Mac4
Geschrieben am: 20.11.2003 09:39:24
Viel Erfolg!
Marc
Betrifft: AW: ActiveCell.Offset(2, 0).Select
von: Erwin
Geschrieben am: 20.11.2003 09:57:27
Hui!!!
Das ging schnell und funktioniert! :)
Danke Mac4
Gruß
Erwin