Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1180to1184
1180to1184
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spaltennummer und Zellmarkierung

Forumthread: Spaltennummer und Zellmarkierung

Spaltennummer und Zellmarkierung
Tomsen
1.
Gibt es eine einfache Möglichkeit eine Reihe nach einem bestimmten Wort zu durchsuchen und dann die Zelle unter der gefundenen zu markieren?
Rows(1).Find("*Eintrag*").EntireColumn.Select markiert ja die Spalte...
2.
Ähnlich wie 1. will ich die Spalte mit einem bestimmten Eintrag finden (was ja kein Problem ist) und dann brauche ich von der gefundenen die Spaltennummer und Spaltenbezeichnung(A,B usw...)
Vielleicht kann mir jemand helfen?!?
Danke
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Rows(1).Find("*Eintrag*").Offset(1).Select
22.10.2010 16:35:12
NoNet
Hallo tomsen,
zu 1.) : Rows(1).Find("*Eintrag*").Offset(1).Select
zu 2.) : Msgbox Rows(1).Find("*Eintrag*").Column
bzw. : MsgBox Replace(Cells(1, Rows(1).Find("*Eintrag*").Column).Address(0, 0, , 0), 1, "")
Gruß und schönes WE, NoNet
Zuviel 'Ballast' - geht kürzer ;-)
22.10.2010 16:40:12
NoNet
Hallo Tomsen,
ich möchte natürlich nicht unnötig Deine Tastatur und Deine Finger strapazieren : 2.) geht kürzer :
MsgBox Replace(Cells(1,[1:1].Find("*Eintrag*").Column).Address(0,0),1,"")
Gruß, NoNet
Anzeige
AW: Zuviel 'Ballast' - geht kürzer ;-)
22.10.2010 16:55:41
Tomsen
erstmal vielen Dank.
zu 1. ist alles klar aber die Spaltenangaben bei 2. brauche ich zur Weiterverarbeitung im Code... müsste sie mir als speichern und nicht als msgbox ausgeben.
Gestattet : lngS = Replace(...)
22.10.2010 17:00:47
NoNet
Hallo tomsen,
bei 2. brauche ich zur Weiterverarbeitung im Code... müsste sie mir als speichern und nicht als  _
msgbox ausgeben.
Da habe ich nichts dagegen - das sei Dir gestattet        - z.B. so : 
Dim lngS as long
lngS = Replace(Cells(1,[1:1].Find("*Eintrag*").Column).Address(0,0),1,"")
Gruß, NoNet
PS: Aber bitte keine "Vorratsdatenspeicherung" daraus machen - das ist ja jetzt verboten...
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige