wie kann ich per VBA Zellen (nur von einem Sheet), die einen Namen haben, farblich markieren? Dachte an sowas ähnlichen wie: Cells.HasFormula.
Hat jemand einen heissen Tipp?
Danke und einen schönen Nachmittag
Eule
Sub Namen_Hervorheben()
Dim na As Name, n As String
Const Tabelle = "Tabelle2" 'nur diese Tabelle berücksichtigen
Debug.Print ActiveSheet.Names.Count
For Each na In Names
n = UCase(na.RefersToLocal)
With Sheets(Tabelle)
If n Like "=" & UCase(Tabelle) & "*" Then
.Range(Split(n, "!")(1)).Interior.ColorIndex = 3
End If
End With
Next
End Sub
Sub NamesColor()
Dim namNames As Name
For Each namNames In ActiveWorkbook.Names
' Hier Tabelle 1 an deinen Namen anpassen.
If Range(namNames.Name).Parent.Name = "Tabelle1" Then
Range(namNames.Name).Interior.ColorIndex = 11
End If
Next namNames
End Sub
Problemstellung
Wie kann ich eine Reihe von Unterprogrammen in Abhängigkeit vom Namen der Eingabezelle aufrufen?
Problemstellung
Wie kann ich die Zellen eines ausgewählten Bereiches überprüfen, ob sie einen Kommentar enthalten und wenn ja, diesen ändern?
Problemstellung
Wie kann ich den Text in einer UserForm-Textbox je Zeile auf verschiedene Zellen aufteilen?
Problemstellung
Wie kann ich zwei Spalten verschiedener Arbeitsblätter vergleichen und Übereinstimmungen in beiden Blättern kennzeichnen?
Problemstellung
Wie kann ich die Anzahl aller mit einer vorgegebenen Zellinnenfarbe markierter Zellen eines vorgegebenen Bereiches zählen?
Problemstellung
Wie kann ich Daten aus einer Textdatei gezielt in bestimmte Zellen eines Arbeitsblattes schreiben lassen? Der Feldseparator ist das Komma.
Problemstellung
Wie kann ich bei der Zahleneingabe bei Minuswerten die Zelle schraffieren und die Schraffierung bei Pluswerten wieder aufheben?
Problemstellung
Wie kann ich unterhalb der markierten Zeilen soviel Zeilen einfügen, wie ich markiert habe?