Hallo Werner,
am 13.01.2016 um 09:40 Uhr schrieb Werner Tietz <[email protected]>
> @Franklin
> Wenn du schon VBA Gedichte ablieferst, solltest du auch die initiale
> Zeile mitliefern:
>
> *x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*
> Option VBAsupport 1
>
> ...
> *x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*
Ach, interessant ... und mit dieser Zeile würde der Excel-VBA-Code
dann unverändert auch unter LibO laufen? Das wäre ja toll ...
Ich nehme an, dass diese Zeile unter Excel nicht notwendig ist,
oder? Daher stand sie natürlich auf der von mir gefundenen Seite für
eine Excel-Lösung auch nicht mit bei und konnte somit von mir auch
nicht mitkopiert werden.
Aber @Norbert, vielleicht geht's ja mit dem nachfolgenden noch
einfacheren Excel-Code - entsprechend auf LibO angepasst - noch
problemloser, wenn Du die Zeile mit der Einfärbung gegen ein
entsprechendes Kommando zum Löschen des Inhalts austauschst.
*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*
Sub NichtGesperrteZellenEinfärben()
Dim zelle As Range
For Each zelle In ActiveSheet.UsedRange
If zelle.Locked = False Then
zelle.Interior.ColorIndex = 4
Else
zelle.Interior.ColorIndex = xlColorIndexNone
End If
Next zelle
End Sub
*x- - - - - - - - - - - - - > Schnapp < - - - - - - - - - - - -x*
> Werner
--
..... und tschüss
Franklin
--
Liste abmelden mit E-Mail an: [email protected]
Probleme?
http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps 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
