Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Finde "xxx", aber erst ab Zeile 7

Forumthread: Finde "xxx", aber erst ab Zeile 7

Finde "xxx", aber erst ab Zeile 7
05.11.2005 18:47:21
Lena
Hallo
Vielen Dank im voraus für Eure Hilfe.
Beste Grüße von Lena

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Habe gefunden.
ransi
hallo lena
habe ich gefunden.
steht bei mir in Zeile 10.
Und nu...?
ransi
AW: Habe gefunden.
05.11.2005 19:02:39
Lena
Hallo Ransi,
verstehe nicht, wie du das meinst.
Beste Grüße von Lena
AW: @ransi
05.11.2005 19:18:02
HansH
Du bist gut, bei mir ist das ganze erst ab Zeile 13 zu finden.
Gruß
Hans
Anzeige
@hans
ransi
hallo hans
habe nocheinmal genau gesucht.
In zeile 27 und zeile 32 habe ich nocheinmal gefunden.
ransi
AW: Finde "xxx", aber erst ab Zeile 7
05.11.2005 19:36:51
Hajo_Zi
Hallo Lena,
man sollte die Frage nicht nur im Betreff schreiben und vielleicht aiuch ein wenig ausführlicher.

Sub Find()
'* H. Ziplies                                     *
'* 05.11.05                                       *
'* erstellt von Hajo.Ziplies@web.de               *
'* <a href="http://home.media-n.de/ziplies/">http://home.media-n.de/ziplies/</a> *
Dim Found As Range
Dim LoLetzte As Long
LoLetzte = IIf(IsEmpty(Range("C65536")), Range("C65536").End(xlUp).Row, 65536)
Set Found = Range("C7:C" & LoLetzte).Find("xxx", Range("C" & LoLetzte), , xlPart, , xlNext)
'   kompletter Vergleich und Inhalt
'    Set Found = .Range(.Cells(2, 10), .Cells(5753, 10)).Find(ActiveSheet.Cells(I, 54), _
'        .Cells(5753, 10), xlValues , xlWhole, , xlNext)
If Found Is Nothing Then Exit 

Sub  'falls nicht gefunden wird 

Sub verlassen
MsgBox Found.Address
End Sub



Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige