Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
19.04.2024 10:59:29
Datei Auswählen und öffnen
19.04.2024 10:46:47
Bestimmte Zellen aus dynamischer Liste zurückgeben
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
508to512
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

gleichen Eintrag finden

gleichen Eintrag finden
04.11.2004 11:39:34
Bommi
Hallo User
möchte über ein Makro gleichen Eintrag aus Zelle A1 in Tabelle1 in Tabelle2 Spalte A1:A100 finden und markieren !
Gruß
Bommi

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: gleichen Eintrag finden
u_
Hallo,
bei VBA gut solltest du das alleine schaffen.
Gruß
AW: gleichen Eintrag finden
04.11.2004 13:08:38
Bommi
Hallo u_
habe schon viel probiert.bin doch nicht so gut ! bekomme immer nur Fehlermeldungen.
habe nicht so viel Zeit.muß auch noch nebenbei arbeiten.
Gruß
Bommi
AW: gleichen Eintrag finden
Boris
Hi,
so in der Art:
Option Explicit

Sub such_mich()
Dim C As Range, rngSearch As Range
Set rngSearch = [tabelle2!a:a]
Set C = [tabelle1!a1]
If Not rngSearch.Find(C, lookat:=xlWhole) Is Nothing Then
MsgBox rngSearch.Find(C, lookat:=xlWhole).Address(0, 0), , "Treffer in:"
Else
MsgBox C & " nicht gefunden", , "Fehlanzeige"
End If
End Sub

Grüße Boris
Anzeige
AW: gleichen Eintrag finden
Bommi
Hallo Boris
Vielen Dank für Deine Hilfe !
Werde gleich probieren. Gruß
Bommi
AW: gleichen Eintrag finden
Uduuh
Hallo,
arbeiten müssen viele. Hast du schon mal an den Recorder gedacht?
Mit ein bisschen Modifikation:

Sub Wert_suchen()
Sheets("Tabelle2").Activate
Range("A1:A100").Find( _
What:=Sheets("Tabelle1").Range("A1"), _
After:=ActiveCell, _
LookIn:=xlFormulas, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False, _
SearchFormat:=False).Activate
End Sub

Gruß aus'm Pott
Udo

Anzeige
AW: gleichen Eintrag finden
04.11.2004 13:50:26
Bommi
Hallo Udo
Vielen Dank !
Probiere es gleich aus.
Gruß
Bommi

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige