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

Daten suchen mit VBA

Forumthread: Daten suchen mit VBA

Daten suchen mit VBA
03.02.2006 09:19:50
Frank
Guten Morgen!
hab eine Frage!
Hab mit dem unten angeführten Macrorecorder folgenden Code aufgezeichnet um das Wort franz in meiner Tabelle zu suchen.
Möchte jetzt das Wort franz duch den Wert in der Zelle A1 ersetzen. ist das möglich?
Cells.Find(What:="franz", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Danke!!!
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Daten suchen mit VBA
03.02.2006 09:35:05
marcl
hallo Frank,
Dim suchwort
suchwort = Range("a1")
Cells.Find(What:=suchwort, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Gruß
marcl
AW: Daten suchen mit VBA
03.02.2006 10:06:48
Frank
Danke funktioniert!!!!!!
Anzeige
AW: Daten suchen mit VBA
03.02.2006 09:57:22
Harald
Hi frank,
ungetestet

Sub tauschen()
Columns("A:A").Select
Selection.Replace What:="franz", Replacement:=Range("a1").value, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub

Gruss Harald
Anzeige
AW: Daten suchen mit VBA
03.02.2006 10:04:08
Hoffi
Hallo Frank,
füge folgende Zeile nach Deinem Code ein:
ActiveCell.Value = Range("a1").Value
Dann müsste es klappen.
Grüße
Hoffi
;

Beliebteste Forumthreads (12 Monate)

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