Seite 1 von 1
benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 19:49
von ChristianAC
Hallo,
Stephan hat in den FAQs kürzlich beschrieben,wie man alle bedingten Formate mit einem Makro markieren und auslesen kann.
Wie aber sieht es bei benannten Bereichen aus? Kann man genauso markieren,
wo überall ein Name für Zelle/n vergeben wurde?
Und kann man mit einem zweiten Makro alle löschen?
Ich habe mal eine Datei angehängt,um alle Unklarheiten zu beseitigen.
Gruss, Chris
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 20:24
von Karolus
Hallo
Was möchtest du denn löschen, den benannten Bereich selbst, oder den Inhalt der referenzierten Zellen ??
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 20:28
von ChristianAC
Hallo KaRoLuS,
nicht den Inhalt, nur den Namen.
Geht das ?
Gruss, Chris
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 20:59
von Karolus
Jep
Code: Alles auswählen
sub remove_named_Ranges()
doc = thisComponent
nranges = doc.NamedRanges
names = nranges.ElementNames
for each name in names
nranges.removeByName(name)
next
end sub
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 21:01
von ChristianAC
cool
ich mach ne Raucherpause
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 21:24
von ChristianAC
Danke sehr.
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Do, 26.02.2015 21:28
von F3K Total
... selektieren geht z.B. so:
Code: Alles auswählen
Sub S_Select_Named_Ranges
oRanges = Thiscomponent.createinstance("com.sun.star.sheet.SheetCellRanges")
oNamedRanges = thiscomponent.namedRanges
for i = 0 to oNamedRanges.count - 1
oRanges.addRangeAddress(oNamedRanges(i).ReferredCells.Rangeaddress, true)
next i
thiscomponent.currentController.select(oRanges)
End Sub
Gruß R
Re: benannte Zellbereiche per Makro auslesen/löschen
Verfasst: Fr, 27.02.2015 09:28
von ChristianAC
vielen lieben Dank Euch beiden
dann habe ich ja alles,was ich brauch'
Das sieht schon wieder ganz anders aus als bei Stephan,da wäre ich mit meinem Abkupfern-Versuch mächtig gescheitert Tschüss, Chris