Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Suche

Forumthread: Suche

Suche
25.09.2006 18:37:47
Fritz
Hallo habe heute noch eine Frage
Möchte mit einem Makro eine Suche in Tabelle2 durchführen der Wert nach dem gesucht werden soll steht in der Tabelle1 in Zelle A1 die gefundene Zelle soll aktiviert werden.
Danke
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suche
25.09.2006 19:18:05
fcs
Hallo Fritz,
Beispiel-Code:

Sub Suchen()
Dim Begriff As Variant
Dim wks1 As Worksheet, wks2 As Worksheet
Dim Zelle As Range
Set wks1 = ActiveWorkbook.Worksheets("Tabelle1")
Set wks2 = ActiveWorkbook.Worksheets("Tabelle2")
Begriff = wks1.Range("A1").Value
Set Zelle = wks2.Cells.Find(What:=Begriff, LookIn:=xlValues, Lookat:=xlWhole)
wks2.Select
Zelle.Select
End Sub

Gruss
Franz
Anzeige
AW: Suche
25.09.2006 19:59:48
Fritz
Danke und schönen Abend
;

Beliebteste Forumthreads (12 Monate)

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