.Range nach Zelleninhalt definieren

Forumthread: .Range nach Zelleninhalt definieren
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: .Range nach Zelleninhalt definieren

03.08.2015 18:50:39

HokoPLM

Hallo zusammen.
Ich möchte gerne
Sheets("Tabelle1").Range("A"&Rows.Count).End(1UP).ROW
Es muss aber nicht immer in Spalte A sein. Es könnte auch Spalte C sein die ich brauche.
Das weiß ich erst dann wenn irgendwann der Eintrag "COA.TEST-100" irgendwo vorkommt.
Wie definiere ich die das ... mit LookAt:=xlPart?

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Recherche im Forum

03.08.2015 19:23:04

Michael
Danke dir und allen anderen

04.08.2015 09:51:36

HokoPLM
gerne, vielen Dank für die Rückmeldung,

04.08.2015 21:31:29

Michael

Recherche im Forum

03.08.2015 19:23:04

Michael

Hi HokoPLM,
https://www.herber.de/mailing/vb/html/xlmthfind.htm
Im dortigen Beispiel erhältst Du als "Treffer" eine Zelle c, deren Spalte Du dann entsprechend einsetzen kannst:

Sub test()
Dim c As Range
With Worksheets(1).Range("a1:e500")
Set c = .Find("COA.TEST-100", LookIn:=xlValues, LookAt:=xlPart)
End With
If Not c Is Nothing Then
MsgBox c.Address
MsgBox Sheets(1).Cells(Rows.Count, c.Column).End(xlUp).Row
End If
End Sub

Schöne Grüße,
Michael

Danke dir und allen anderen

04.08.2015 09:51:36

HokoPLM

Für die Hilfe und für viele gute Beiträge.
Ich hatte tatsächlich im Archiv geschaut, leider nichts gefunden.
Ich bedanke mich für alle Beiträge und Beispiele aus dem Archiv.
So ein Forum wie dieses gestaltet Die Arbeit viel leichter.
mfg

gerne, vielen Dank für die Rückmeldung,

04.08.2015 21:31:29

Michael

HokoPLM,
ich finde gerade dieses Forum auch super klasse!
Gute Zeit,
Michael

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!