Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
600to604
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
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nach Inhaltsuchen (String)

Nach Inhaltsuchen (String)
25.04.2005 09:28:28
Volker
Guten morgen
ich möchte per Macro mehrere Zellen prüfen und evtl ändern. Die Zelle soll immer dann geändert werden wenn eine bestimmter Zeichenkette in der Zelle vorhanden ist.
so kann ich den kompletten Inhalt austauschen.
if zelle.text = "Tagungsorte: Köln" then
zelle.text = "Tagungsort: Köln"
end if.
(der Name der Staft kann variieren. Ich muss das "e" raushaben).
Wie kann ich aber nur nach "Tagungsorte" suchen ?
Gibt es in der Macrosprache sowas wie "contains" oder sonst was ähnliches ?
Danke
Gruß
Volker

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nach Inhaltsuchen (String)
25.04.2005 09:31:28
=Peter=
Hallo Volker,
Bearbeiten - Ersetzen reicht nicht aus?
HTH
Gruß
Peter
AW: Nach Inhaltsuchen (String)
25.04.2005 09:36:44
Volker
Hallo Peter,
ersetzen würde auch gehen. Wenn dadurch der Rest der Zelle nicht verändert wird.
Beispiel
Zelle A1: Tagungsorte Köln
Zelle A2: Tagungsorte Hamburg
zu ersetzen wäre dann Tagungsorte durch Tagungsort
Gruß
Volker
AW: Nach Inhaltsuchen (String)
25.04.2005 09:46:59
=Peter=
Hallo Volker,
wenn du bei Suchen nach 'Tagungsorte' und bei Ersetzen 'Tagungsort' eingibst, dann müsste es eigentlich problemlos funktionieren.
Du kannst es ja an einem Duplikat deiner Tabelle ausprobieren.
HTH
Gruß
Peter
AW: Nach Inhaltsuchen (String)
25.04.2005 09:38:15
Harald
Hallo Volker,
mit left(string, länge) kannst Du den linken Teil des Strings isolieren, also z.B.
if left(zelle.text,11) = "Tagungsorte"
Ebenso kannst Du mit right() den rechten Teil isolieren. Zusammen könnte das so aussehen (ungetestet):
if left(zelle.text,11) = "Tagungsorte" Then
Zelle.text = "Tagungsort" & right(Zelle.text, len(Zelle.text)-11)
End if
Gruß Harald
Anzeige
DANKE !!!!
25.04.2005 09:57:26
Volker
Hallo Harald,
das wars denke ich.
Danke

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige