innerhalb einer Markierung ist eine Zelle aktiv. Ich möchte abfragen, ob alle Zellen innerhalb der Markierung in der Zeile der Aktiven Zelle die selbe Hintergrundfarbe haben!
Wäre über Vorschläge sehr dankbar!
MfG
Martin
innerhalb einer Markierung ist eine Zelle aktiv. Ich möchte abfragen, ob alle Zellen innerhalb der Markierung in der Zeile der Aktiven Zelle die selbe Hintergrundfarbe haben!
Wäre über Vorschläge sehr dankbar!
MfG
Martin
beim markieren ist nur eine Zelle die Active und die ist gemeint???
Option Explicit
Sub Martin()
' Erstellt von Hajo Ziplies am 28.12.02
Dim RaZelle As Range, BoWert As Boolean
For Each RaZelle In Selection
If RaZelle.Interior.ColorIndex <> ActiveCell.Interior.ColorIndex Then
BoWert = True
Exit For
End If
Next RaZelle
If BoWert = True Then MsgBox "Es haben nicht alle Zellen die gleiche Farbe"
End Sub
Code eingefügt mit: Excel Code Jeanie
Code Jeanie
Frage
Das Umsetzen nach Html klappt perfekt, auch die Ansicht in den Foren ist gegeben. Bei manchen Foren kann man aber anscheinend nicht den dargestellten Code nach VBA rückkopieren. Warum?
Antwort
Dies liegt nicht an der Code Jeanie !!! Manche Foren interpretieren anscheinend < pre > < /pre > Tags nicht richtig und erzeugen am Zeilenende einen weichen Zeilenumbruch anstatt eines harten Zeilenumbruches. Dies führt dazu, dass im VBA-Editor die Zeilen hintereinander geschrieben werden. Zum Rückkopieren in solchen Fällen: Fügen Sie den kopierten Code aus dem Forum nach Word ein, kopieren Sie ihn dort wieder und fügen Sie ihn dann im VBA - Editor ein
Gruß Hajo