Zellfärbung bei Formelverwendung
Ausgangslage - Was tut dieser Code-Schnipsel?
Markiert alle Zellen, die von einer oder mehreren selektierten Formeln verwendet werden. Die betroffenen Zellen werden mit einer roten Hintergrundfarbe hervorgehoben.
Der Quelltext
Option Explicit
' Original-Quelltext unter: https://www.online-vba.de/zellfaerbung-bei-formelverwendung
' Express-Hilfe für VBA unter https://www.online-vba.de/vba-expresshilfe
' Es gelten die Nutzungsbedingungen von Online-VBA.de
'Verwendung: Markieren Sie einen Zellenbereich und starten Sie dieses Makro
Public Sub OVBAde_FaerbeInFormelnVerwendeteZellenRot()
Const lFarbe As Long = 3
Dim oZelle As Object
For Each oZelle In Selection.Cells
If oZelle.HasFormula() = True Then
Range(oZelle.Precedents.Address).Interior.ColorIndex = lFarbe
End If
Next oZelle
MsgBox "Fertig!"
End Sub
Anmerkungen und Hinweise
Verwendung: Markieren Sie einen Zellenbereich und starten Sie dieses Makro.
Dieser Codeschnipsel wurde geschrieben von Marc Wershoven im Jahr 2013.
Die Nutzung erfolgt auf eigene Gefahr.
Bitte denken Sie immer zuerst an eine ausreichende Datensicherung.
Wir können keinen kostenlosen Support anbieten.
Es gelten unsere Nutzungsbedingungen.
