Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Makro virker ikke på beskyttet ark
 Besvar Besvar
Forfatter
  Emne Søg Emne Søg  Emne funktioner Emne funktioner
Nignag Se dropdown
Forum Begynder
Forum Begynder


Medlem: 19.Apr.2024
Land: Danmark
Status: Offline
Point: 10 		Indlæg funktioner Indlæg funktioner   Tak (0) Tak(0)   Citér Nignag Citér  BesvarSvar Direkte link til dette indlæg Emne: Makro virker ikke på beskyttet ark
    Sendt: 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 :-)
Til top



Til top
maxzpad Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 675 		Accepteret svar Accepteret svar
Indlæg funktioner Indlæg funktioner   Tak (0) Tak(0)   Citér maxzpad Citér  BesvarSvar Direkte link til dette indlæg Sendt: 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
Til top
Nignag Se dropdown
Forum Begynder
Forum Begynder


Medlem: 19.Apr.2024
Land: Danmark
Status: Offline
Point: 10 		Indlæg funktioner Indlæg funktioner   Tak (0) Tak(0)   Citér Nignag Citér  BesvarSvar Direkte link til dette indlæg Sendt: 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
Til top
Nignag Se dropdown
Forum Begynder
Forum Begynder


Medlem: 19.Apr.2024
Land: Danmark
Status: Offline
Point: 10 		Indlæg funktioner Indlæg funktioner   Tak (0) Tak(0)   Citér Nignag Citér  BesvarSvar Direkte link til dette indlæg Sendt: 22.Maj.2024 kl. 12:01
Har fået det løst med følgende kommando

ActiveSheet.Unprotect _

ActiveSheet.Protect
Til top
maxzpad Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 04.Aug.2016
Land: Danmark
Status: Offline
Point: 675 		Indlæg funktioner Indlæg funktioner   Tak (1) Tak(1)   Citér maxzpad Citér  BesvarSvar Direkte link til dette indlæg Sendt: 22.Maj.2024 kl. 12:55
Super fint.

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

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk