von DPunch » Mi, 20.10.2010 17:27
Aloha
Der
ReplaceDescriptor macht, was Dir vorschwebt (für Einstellungen, *was* *wie* gesucht und dann ersetzt werden soll, siehe
SearchDescriptor)
Code: Alles auswählen
oDoc = thisComponent
oReplaceDesc = oDoc.createReplaceDescriptor
With oReplaceDesc
.SearchRegularExpression = True
.SearchString = "\n"
.ReplaceString = "\n"
End With
MsgBox "Insgesamt wurden " & oDoc.replaceAll(oReplaceDesc) & " Vorkommen ersetzt",64,"Ersetzen"
Aloha
Der [url=http://api.openoffice.org/docs/common/ref/com/sun/star/util/ReplaceDescriptor.html]ReplaceDescriptor[/url] macht, was Dir vorschwebt (für Einstellungen, *was* *wie* gesucht und dann ersetzt werden soll, siehe [url=http://api.openoffice.org/docs/common/ref/com/sun/star/util/SearchDescriptor.html]SearchDescriptor[/url])
[code]
oDoc = thisComponent
oReplaceDesc = oDoc.createReplaceDescriptor
With oReplaceDesc
.SearchRegularExpression = True
.SearchString = "\n"
.ReplaceString = "\n"
End With
MsgBox "Insgesamt wurden " & oDoc.replaceAll(oReplaceDesc) & " Vorkommen ersetzt",64,"Ersetzen"[/code]