Ich suche nach einer VBA Lösung , die mir alle Spalten der GESAMTEN Arbeitsmappe zählt , die bis hinunter eine bestimmten Füllfarbe haben.
Habe aber leider keine Ahnung wie das gehen soll.
Vielen Dank für die Hilfe
mfG
Herbert
Sub Spalten_zählen()
Dim i As Integer
Dim ws As Worksheet
Dim Zähler
Zähler = 0
For Each ws In ActiveWorkbook.Sheets
For i = 1 To ws.Columns.Count
If ws.Columns(i).Interior.ColorIndex = 4 Then
Zähler = Zähler + 1
End If
Next i
Next ws
MsgBox Zähler
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen