Kombinere aktive makros med beskyttelse af ark.

Man er jo nødt til at sikre at makroerne kan køre ved arkbeskyttelse. Ellers skal beskyttelsen fjernes ved tryk på kontrolelement, og slås til ved afslutning af makro. Giv evt. et eksempel på en makro der ikke kører ved beskyttelse af ark.

sæt denne ind før koden
    ActiveSheet.Unprotect

og denne efter
ActiveSheet.Protect

sordan her
Sub Makro1()
    ActiveSheet.Unprotect
    'Andre koder
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios _
        :=True
End Sub

Lukketid.