Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Makro-nach Kriterium suchen + ersetzen

Makro-nach Kriterium suchen + ersetzen
12.09.2007 14:19:00
Katharina
Hallo!
Bin scho kurz vorm Verzweifeln...
Also...
Ich möchte in meiner Tabelle nach einem bestimmten Kriterium suchen ( K ) und es durch den Wert aus der Zelle ( von rechts aus ) ersetzen!Am besten wäre ein Makro!
Kann mir irgendjemand helfen?
Liebe Grüße
Katha

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Makro-nach Kriterium suchen + ersetzen
12.09.2007 14:54:00
Katharina
sorry,
ich meine den Wert aus der dritten Zelle (als Ersatz)

AW: Makro-nach Kriterium suchen + ersetzen
12.09.2007 14:54:00
Jan3
Hi,
Da Deine Angaben sehr ungenau sind, anbei ein allgemeines Suchmakro mit Find:

Sub suchen()
'Dieses Beispiel findet alle Zellen im Bereich "A2:D500"
'des aktiven Tabellenblattes, die den suchwert aus der Zelle A1 enthalten.
'Anschließend werden diese Zellen grau formatiert.
suchwert = ActiveSheet.Range("A1")
With ActiveSheet.Range("a2:d500")
Set c = .Find(suchwert, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
c.Interior.Pattern = xlPatternGray50
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address  firstAddress
End If
End With
End Sub


Jan

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige