Re: Meldung unterdrücken
Verfasst: Mi, 06.02.2013 09:02
Morgen,
versuche das vielleicht mal so.
cu, Bernd
--
versuche das vielleicht mal so.
cu, Bernd
--
Code: Alles auswählen
Sub Main
dim oSheet, oRange, OSR
oSheet = ThisComponent.CurrentController.ActiveSheet
oRange = oSheet.getCellRangeByName("D11:D13")
oSR = oRange.createReplaceDescriptor
oSR.SearchCaseSensitive = true
oSR.SearchRegularExpression = false
oSR.setSearchString("/")
oSR.setReplaceString("_")
oRange.ReplaceAll(oSR)
End Sub