Hallo Gooly
Wenn du all Benanten bereiche Löschen möchtest, so hab ich hier noch ein
anderes Makro.:
Sub RemoveAllNamedRange
Dim oRanges As Object
oRanges = ThisComponent.NamedRanges
n=oRanges.getCount-1
For i=0 To n
sName$=oRanges(0).Name
oRanges.removeByName(sName$)
Next
End Sub
Gruß Frieder
--
Informationen zum Abmelden: E-Mail an [email protected]
Tips zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert
