Suchen und Ersetzen via Macro

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Suchen und Ersetzen via Macro

Re: Suchen und Ersetzen via Macro

von MikeRo » Di, 12.07.2011 12:26

Danke :-)

Code: Alles auswählen

   				oCellRange = oSheet.getCellRangeByName("A10:ZZ10")

				ReplaceDescriptor = oCellRange.createReplaceDescriptor()
				ReplaceDescriptor.SearchString = "Format"
				ReplaceDescriptor.ReplaceString = "Neuer Text"

				oCellRange.ReplaceAll(ReplaceDescriptor)

Re: Suchen und Ersetzen via Macro

von Karolus » Di, 12.07.2011 11:21

Hallo
Kann man den Suchbereich auch definieren?
Ja.
Gruß Karo

(Falls dir die Antwort zu mager ist präzisiere zunächst mal "Zeile")

Re: Suchen und Ersetzen via Macro

von MikeRo » Di, 12.07.2011 11:02

Wie kann ich denn in einem bestimmten Bereich suchen? Ich will das er Ein Wort findet aber nur in einer bestimmten Zeile und nicht irgendwo anders.
Kann man den Suchbereich auch definieren?

von Charly » Fr, 17.09.2004 10:26

Hallo!

Ich muss mich entschuldigen. Ich habe mich vertippt.

Der Befehl lautet natürlich :

Code: Alles auswählen

Doc = ThisComponent
und nicht

Code: Alles auswählen

Doc = This Component
Gruß
Charly

Das klappt nich

von hoefri55 » Fr, 17.09.2004 08:59

hallo

ich habe den Code ausprobiert und bin bis zum zweiten Wort gekommen.
Fehlermeldung:

Basic Syntaxfehler
Unerwartetes Symbol: Component

von Charly » Do, 16.09.2004 18:39

Hallo!

Ich glaube bei den mit den Recordern aufgezeichneten Programmen kann man die Meldungen nicht abstellen. Er arbeitet genauso, wie wenn man den Befehl über Menü aufruft. Ich habe zumindest noch keinen Befehl gefunden um die Meldungen abzustellen. In Excel gibt es so etwas.

In Starbasic gibt es allerdings auch einen direkten Befehl für Suchen und ersetzen. Probier einmal folgenden Code aus:

Code: Alles auswählen

Sub Suchen_Ersetzen()

Doc = This Component
Sheet = Doc.Sheets(0)

ReplaceDescriptor= Sheet.createReplaceDescriptor()
ReplaceDescriptor.SearchString = "Suchtext"
ReplaceDescriptor.ReplaceString = "Neuer Text"

Sheet.ReplaceAll(ReplaceDescriptor)

End Sub
Gruß
Charly

Suchen und Ersetzen via Macro

von hoefri55 » Do, 16.09.2004 15:14

Ich blutiger Anfänger habe schon wieder das nächste Problem:

Ich möchte per Macro verschiedene Texteinträge in meinem Calc-Tabellenblatt ändern. Das habe ich über Macro aufzeichnen probiert.
Es klappt auch solange die gesuchten Textstellen gefunden werden. Falls das nicht der Fall ist, gibt oo aber leider eine entsprechende Meldung aus:

"Suchbegriff nicht gefunden"

Wie kann ich diese Meldung unterdrücken?

Danke, F. Hömmeke

Nach oben