Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
820to824
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
820to824
820to824
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Suchen, Finden, Spalte markieren
24.11.2006 11:00:52
Engelbert
Hallo Forum,
ich habe hier ein Problem, dürfte eigentlich nicht so schwierig sein, komme damit aber nicht voran.
Ich habe in der Tabelle2 in der Zeile1 Werte stehen (Spaltenanzahl variiert)
Nun muss ich in der Tabelle1 nach diesen Werten suchen
Die Spalte in der der Wert gefunden wurde und die 2 folgenden Spalten farbig markieren.
Und dann mit dem nächsten Suchbegriff in Tabelle2 Zeile1 das selbe.
Würde mich sehr freuen, wenn mir da jemand helfen könnte.
Schöne Grüße aus Nürnberg, Bert

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Danke, hat sich erledigt!
24.11.2006 11:09:07
Engelbert
Hallo Forum, hat sich erledigt
hier der Angepasste Code aus dem FAQ:
Dim wks As Worksheet
Dim rngFind As Range, rngColumns As Range
Dim sFind As String, sSearch As String
Worksheets("Planungsübersicht").Select
sSearch = InputBox("Suchbegriff:", , "test")
Set rngFind = Cells.Find(sSearch)
If rngColumns Is Nothing Then
Set rngColumns = rngFind
End If
If Not rngFind Is Nothing Then
sFind = rngFind.Address
Do
Set rngColumns = Application.Union(rngFind.EntireColumn, rngColumns)
Set rngFind = Cells.FindNext(After:=rngFind)
If rngFind.Address = sFind Then Exit Do
Loop
End If
rngColumns.Select
hier wird die Spalte selectiert, den Rest schaff ich dann auch alleine!
Schöne Grüße aus Nürnberg, Bert
Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige