Hallo Katja,
vielen Dank für die Hilfe. So hat es nicht geklappt, habe es so umgeschrieben:
[code]Option Explicit
Sub Worksheet_SelectionChange(ByVal target As Range)
If target.Interior.ColorIndex = 15 Then
MsgBox "Bitte nur Werktage auswählen"
End If
End Sub[/code]
Das funktioniert leider nur dann, wenn die Zelle manuell eingefärbt wurde. Leider sind die Spalten aber bedingt formatiert - da greift das nicht. :( Bin echt am Verzweifeln. Wenn du noch eine Idee hast, gerne her damit. Ich fürchte aber fast, dass ich aufgeben muss...
@Gast73933: Ja, hier der dritte Thread. Aber der erste, in dem mir geholfen wurde. ;)
VG
|