Skydda specificerade data med hjälp av VBA - Excel Tips

Anthony frågar:

När du väljer '0 -xlUnlockedCells' riktighet i fönstret EnableSelection kan endast de olåsta cellerna väljas när arbetsboken är skyddad. Men när arbetsboken sparas, stängs och sedan öppnas återställs EnableSelection som standard till '0 -xlNoRestrictions' hur kan jag stoppa detta? Hälsningar.

Tja, detta kan lösas med vissa händelser. En, med hjälp av Workbook_Open-händelsen, eller två, med Sheet_Activate-händelsen, så här:

I arbetsbokens modul

Private Sub Workbook_Open() Sheets("Sheet1").EnableSelection = xlUnlockedCells End Sub

eller i bladmodulen

Private Sub Worksheet_Activate() ActiveSheet.EnableSelection = xlUnlockedCells End Sub

En sista sak, xlUnlockedCells är lika med 1. 0 är xlNoRestrictions och -4142 är xlNoSelection.