Hallo,
ich habe diese Prozedur:
i = 1
For Each zelle In Selection
If zelle.Interior.ColorIndex = 6 Then
MsgBox "Achtung, gelbe Zelle. Prozedur wird beendet"
Exit Sub
Else
Worksheets("Plot").Cells(i, 3).Value = zelle.Value
i = i + 1
End If
Next
Die Zellen in der Selektionsmenge werden in das Tabellenblatt "Plot" kopiert. Befindet sich in der Selektionsmenge eine gelbe Zelle, wird die Prozedur abgebrochen. Mir wäre es aber lieb, wenn die Prozedur nicht abgebrochen würde, sondern die gelbe Zelle soll einfach übersürungen und nicht mitkopiert werden. Bekommt man das hin?