Print side | Luk vindue

Makro virker ikke på beskyttet ark

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=5086
Udskrevet den: 31.Jan.2025 kl. 07:01


Emne: Makro virker ikke på beskyttet ark
Besked fra: Nignag
Emne: Makro virker ikke på beskyttet ark
Posteringsdato: 22.Maj.2024 kl. 09:27
Hej Alle,
Jeg har indsat et tekstfelt og tildelt denne en makro - Men når jeg beskytter arket melder den fejl på makroen.

Under beskyt ark har jeg flueben i følgende:
- Marker låste celler
- Rediger objekter
- Rediger scenarier

Jeg har været under "Formater Figur" og fjernet låst i egenskaber.

Håber der er nogen der kan hjælpe derude :-)


Svar:
Besked fra: maxzpad
Posteringsdato: 22.Maj.2024 kl. 10:59
Hvis cellerne, som makroen skal skrive i, er låste, så kan det ikke lade sig gøre, med mindre du først lader makroen fjerne arkbeskyttelsen og derefter påfører den igen.

Sheets("my_sheet").Unprotect

... makroen skriver

Sheets("my_sheet").Protect

Besked fra: Nignag
Posteringsdato: 22.Maj.2024 kl. 11:28
Hvor i nedenstående makro vil du sætte dem ind - Jeg får fejl

Sub StyklisttilSAP()
'
' StyklisttilSAP Makro
'

'

    ActiveSheet.Range("$A$4:$P$58").AutoFilter Field:=5, Criteria1:="<>0", _
        Operator:=xlAnd, Criteria2:="<>-"
        
End Sub

Besked fra: Nignag
Posteringsdato: 22.Maj.2024 kl. 12:01
Har fået det løst med følgende kommando

ActiveSheet.Unprotect _

ActiveSheet.Protect

Besked fra: maxzpad
Posteringsdato: 22.Maj.2024 kl. 12:55
Super fint.

Kan jeg lokke dig til at markere min løsning som accepteret?


Print side | Luk vindue