Makroer og "protected sheet" er det umuligt

Du kan fjerne beskyttelsen af arket i starten af din macro, og så slå det til igen når du er færdig.

Sheets(“sheetname”).UnProtect password:=”password”

<gør det du skal>

Sheets(“sheetname”).Protect password:=”password”

ActiveSheet.Unprotect kan også bruges.

Sub Macro3()
    Sheets("Kalkulator").Unprotect Password:=”simar08”
    Sheets("Indtast tilbud").Unprotect Password:=”simar08”
    Sheets("Udregning").Unprotect Password:=”simar08”
    Sheets("Distribution").Unprotect Password:=”simar08”
    ActiveSheet.Shapes("Drop Down 9").Select
    With Selection
        .ListFillRange = "'Indtast tilbud'!$B$20:$B$" & (Worksheets("Udregning").Range("AG3") + 20)
        .LinkedCell = "Udregning!$AG$2"
        .DropDownLines = Worksheets("Udregning").Range("AG4")
        .Display3DShading = True
    End With
    Sheets("Kalkulator").Protect Password:=”simar08”
    Sheets("Indtast tilbud").Protect Password:=”simar08”
    Sheets("Udregning").Protect Password:=”simar08”
    Sheets("Distribution").Protect Password:=”simar08”
End Sub

eksempelvis?

...

Hvorfor tager du selv pointene?

det er da virkeligt et godt spørgsmål. Det aner jeg virkelig ikke.. det beklager jeg snowball :(