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

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!!!

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!!!!!!
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)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige