wie füge ich in dem Code noch einen Bereich ein zb. C1:C15 Bitte um Hilfe
Gruß Victor
Sub Nein()
If Not Intersect(ActiveCell, Range("A1:A25")) Is Nothing Then
ActiveCell = "Nein"
End If
End Sub
Sub Nein()
If Not Intersect(ActiveCell, Range("A1:A25")) Is Nothing Then
ActiveCell = "Nein"
End If
End Sub