CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede lundjepsen Praktikant
20. november 2007 - 21:17 Der er 7 kommentarer og
1 løsning

fjern flere ark beskyttelse og lås dem igen

hej.
Hvordan låser man alle ark op på en gang, i een komando
og låser dem igen i een komando ??

Sheets.Unprotect Password:="pw"
Sheets.Protect Password:="pw"
Avatar billede jkrons Professor
20. november 2007 - 21:32 #1
Du kan gøre det i et loop:

For Each s In ActiveWorkbook.Sheets
s.Unprotect Password:="pw"
Next s

Det samem med protect.
Avatar billede lundjepsen Praktikant
20. november 2007 - 21:40 #2
skal man ikke definere "s" ?
Avatar billede jkrons Professor
20. november 2007 - 21:51 #3
Nope. Sætningen "For Each s In ActiveWorkbook.Sheets" erklærer at s repræsenterer hvert ark i mappen.
Avatar billede lundjepsen Praktikant
20. november 2007 - 22:00 #4
kanon jkrons, tusinde tak
Avatar billede lundjepsen Praktikant
20. november 2007 - 22:00 #5
øøhh jkron så skal DU svare,,
Avatar billede jkrons Professor
20. november 2007 - 23:19 #6
Og svar kommer her :-)
Avatar billede Flemming Vadet - Smart Office DK Professor
21. november 2007 - 20:21 #7
Hvis man kører med Option Explicit (som man selvfølgelig gør - hihi) så kræves det at s defineres...

Sub Dims()
    Dim s As Worksheet

    'jkrons kode

End Sub
Avatar billede lundjepsen Praktikant
22. november 2007 - 21:12 #8
Tak flemmingdahl
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser
Excel-kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
VBA - Excel programering til Onenote Af ingeman i Excel 4 24/04/202512:37 25/04/202510:23
SQL til excel med farver Af Jjn i Excel 1 24/04/202511:50 24/04/202513:56
Tidsformater Af Peder Lund Nielsen i Excel 5 21/04/202520:54 23/04/202522:15
Opdele ét ark i flere ark Af karina1971 i Excel 13 15/04/202507:20 16/04/202509:07
Arbejdstid opdeles i tidsintervaller Af Camilla i Excel 2 14/04/202516:08 14/04/202517:17
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 21:37 Mistes nøglen til mit Wi-Fi Af valby i Internetforbindelser
I går 20:45 Magnus & Myggen - script error: Af Mathilde i Andet software
I går 19:10 Acer gaming bærbar Af Heidip i Windows
I går 11:46 Fra SQL tll em MPP fil Af per2edb i Access
04/0519:43 Prime Video Af Jette i Andet software
White papers
Flere white papers »


Premium
Teaser billede
Topchefen løfter sløret: Her er fem opsigtsvækkende tal fra Microsofts nye regnskab
Læs mere »
ServiceNow-boss forventer fremgang under Trumps regeringstid: Vi har fælles ambitioner
Du risikerer fuld ransagning af din telefon og computer: Sådan bør du forberede dig inden din næste USA-rejse
Hackere kan udnytte nyopdaget Apple-sårbarhed: Millioner af enheder kan være i fare
Se alle »
Computerworld
Teaser billede
Ændring af OneDrive: Microsoft vil lokke brugere til at synkronisere personlige filer til arbejds-pc'er
Læs mere »
Apple har netop opdateret dit kort: København er nærmest blevet helt forandret
NIS2-loven enstemmigt vedtaget i Folketinget: Her er den nye lov - træder i kraft 1. juli
Efter 25 millioner solgte bøger bliver dansk bestseller nu til en mørk Netflix-serie
Se alle »
CIO
Teaser billede
NIS2-loven enstemmigt vedtaget i Folketinget: Her er den nye lov - træder i kraft 1. juli
Læs mere »
Her er priserne: Europæiske cloud-løsninger er langt billigere end de amerikanske giganter
Europæisk alternativ til Microsoft 365 oplever enorm interesse: Donald Trump og JD Vance giver det kæmpe boost
Her er Microsofts fem vigtigste løfter til Europa: Vil modstå Trump og indsætte særlig europæisk bestyrelse
Se alle »
Job & Karriere
Teaser billede
Den danske it-branche er på vagt: Hvad nu hvis Trump lukker for Microsoft 365 og AWS fra på mandag?
Læs mere »
Danske it-folk lokkes med store tiltrædelses-bonusser: Nu kan du score mere end 100.000 kroner ved at skrive under på ny jobkontrakt
Så meget tjener en dansk it-udvikler i gennemsnit om måneden: Forventer at få solide lønstigninger inden længe
Husk det her, når du skal købe it-løsninger næste gang: Vi er vidner til it-branchens største maskefald nogensinde
Se alle »
White paper
Teaser billede
Sådan sikrer du nem og beskyttet adgang til dine ressourcer
Læs mere »
Cybersikkerhed 2025: Er din branche blandt de mest udsatte?
AI og kunderejsen: Sådan vinder du fremtidens forbrugere
Sådan: Virtualisering uden vendor lock-in og høje omkostninger
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »