| Startseite | Inhalt
StarBasic / OpenOffice.org Basic FAQ
Fragen und Infos: starbasic@dannenhoefer.de

Zurück Vor |
| 7.5.1 Wie kann man in Calc-Dokumenten suchen und ersetzen?
Innerhalb eines Calc-Dokumentes muß man vorher festlegen in welchem Bereich (Zellbereich oder Arbeitsblatt) man ersetzen will. Erst dann steht der Replacedescriptor zur Verfügung, der ein Suchen und Ersetzen ermöglicht. sub ersetzen 'Arbeitsblatt oSheet =ThisComponent.sheets(0) oSuchen = oSheet.createReplaceDescriptor oSuchen.setSearchString("41") oSuchen.setReplaceString("411") osheet.replaceAll(oSuchen) 'oder Zellbereich oSheet =ThisComponent.sheets(0) oRange = osheet.getCellRangeByName("A1:B5") oSuchen = oRange.createReplaceDescriptor oSuchen.setSearchString("41") oSuchen.setReplaceString("411") orange.replaceAll(oSuchen) end sub Möchte man in alle Arbeitsblätter Suchen und Ersetzen muß man eine Schleife über alle Arbeitsblätter durchführen. myCalc = thisComponent Anzahl=myCalc.Sheets.count For i=0 to Anzahl-1 oSheet = myCalc.Sheets(i) oSuchen = oSheet.createReplaceDescriptor oSuchen.setSearchString("41") oSuchen.setReplaceString("411") osheet.replaceAll(oSuchen) Next i |
Seitenanfang |

2003 - 2009 von Michael Dannenhöfer |
Letzte Aktualisierung: 06.04.2009