kann ich ermöglichen, dass Schriftfarbe und Schriftart in ungeschützte Zellen bei einem mit Blattschutz versehenen Tabellenblatt geändert werden können, ohne dass der Schutz deaktiviert werden muss?
Im Voraus Besten Dank
Gruss
Erwin
Sub test()
ActiveSheet.Protect Password:="123", userinterfaceonly:=True
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
If Not Target.Locked Then
Cancel = True
Application.Dialogs(xlDialogActiveCellFont).Show
End If
End Sub