Seite 1 von 1

in Writer alle chr(10) zu chr(13) machen [gelöst]

Verfasst: Mi, 20.10.2010 15:11
von clag
Hallo Kenner und Könner,

gibt es eine einfache uns schnelle Methode um mit Basic Code in Writer alle chr(10) durch chr(13) zu ersetzen ?
also die Entsprechung für das manuelle suchen und ersetzen /n /n ?

und wie müsste das in Code aussehen ?

Re: in Writer alle chr(10) zu chr(13) machen

Verfasst: Mi, 20.10.2010 17:27
von DPunch
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"

Re: in Writer alle chr(10) zu chr(13) machen

Verfasst: Fr, 22.10.2010 07:58
von clag
Hallo DPunch,

wie immer sachlich kompetent und mit, sowohl umgehend erhellender- :idea: als auch Langzeit-Wirkung :!:

Allerbesten Danke für diese Antwort :)