Brug af kontrolknapper (med makro) på beskyttet ark

Du bliver nød til at låse ark i starten af koden

og så låse den igen

ActiveSheet.unProtect

kode..

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

Det kan man kalde en hurtig redning. Takker mange gange.

Jeg kom vist til at afvise dit svar, jlemming, kan du ikke skrive igen, så jeg kan acceptere?

Velbekomme, svaret kommer først nu :o)

Jeg har samme problem med en rullemenu (kontrolelement) i et beskyttet ark. Jeg kan godt få lov til at rulle på menuen, men når jeg vælger et punkt, så får jeg besked på, at:

"Den celle eller det diagram, du prøver at ændre, er skrivebeskyttet. Hvis du vil redigere en beskyttet celle eller et beskyttet diagram, skal du først fjerne beskyttelsen med kommandoen Fjern arkbeskyttelse (menuen Funktioner, undermenuen Beskyttelse. Du kan blive bedt om at angive en adgangskode."

Kan man, som beskrevet i andet indlæg ovenfor, fjerne beskyttelse ved valg og sætte beskyttelsen på igen på en rullemenu, eller er der en anden mulighed?
Mvh PC

ikke mig bekendt. Cellen til resultatet må ikke være låst.

istedet for kontrolelement kan du bruge validation, men den må eller ikke være låst.
se evt. http://www.eksperten.dk/spm/801581

Det var det med at fjerne låsen på resultat cellen. Tak for hjælpen - igen. :o)

nu fandt jeg en løsning
hvis du vil have den låst er der denne mulighed på kontrolelementer

Private Sub ListBox2_Change()
ActiveSheet.Unprotect
Range("D1").Value = ListBox2.Value
ActiveSheet.Unprotect DrawingObjects:=True, Contents:=True, Scenarios:=True

End Sub