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

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Få excel til at indsætte værdi i månedsfelter ud fra start og stop dato Af CBH i Excel 6 08/05/202413:16 I går 14:31
Dato opslag udfordring igen igen Af Klaus W i Excel 6 08/05/202410:15 08/05/202416:07
Sumfunktion ud fra dato Af scholes i Excel 3 08/05/202408:34 08/05/202413:29
Vise flere ark fra samme workbook Af Nanarsi i Excel 3 07/05/202410:33 09/05/202412:56
Makro: Hvis fundet flere, så.... Af EveryMA i Excel 1 06/05/202415:28 07/05/202408:09
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 dag 13:28 Strømkabel til Philips barbermaskine S1333 Af ErikHg i Fri debat
I dag 11:45 Stort mikrofon problem Af valby i Windows
I dag 09:58 Koble 2 skærme til bærbar Af Jensinho i Skærme
I går 21:14 Gammel spil Af Kristoffer i Andet hardware
I går 18:09 Er der let at rense et tastatur? Af garlic4 i Andet hardware
White papers
Flere white papers »


Premium
Teaser billede
Her er SAP's største ønsker til EU: Vi har tabt forbruger-internettet – nu skal vi vinde industri-internettet
Læs mere »
Microsoft vil droppe lønloft: Ansatte kan se frem til højere løn
Kort tid inden lov træder i kraft oplever danske software-virksomheder stor interesse for it-løsning: Er du klar til de nye regler?
Lukker it-systemerne ned i to uger på grund af implementering: Den bedste måde at sikre, at ingen data går tabt
Se alle »
Computerworld
Teaser billede
Nyopdaget sårbarhed rammer næsten alle VPN'er: Gør dem usikre og nærmest ubrugelige
Læs mere »
Mød det tyndeste Apple-produkt nogensinde: Klar med en hel stribe af iPad-nyheder
Guide: Sådan surfer du under hackernes radarer – via en VPN-forbindelse
Opdater din browser med det samme: Stor sårbarhed rammer Chrome og en række andre browsere
Se alle »
CIO
Teaser billede
Lukker it-systemerne ned i to uger på grund af implementering: Den bedste måde at sikre, at ingen data går tabt
Læs mere »
Oracle er eneste mulighed: Region Sjælland tvunget til at indgå million-aftale uden konkurrence
Hundredevis af selskaber klager over Microsofts licens-policy: Vi er låst fast og bundet
Her er de bedste Microsoft-partnere i Danmark – mere end 30 selskaber kæmper om priser til årets Partner Awards
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Knap 40 procent af disse it-folk tjener tjener mindst 57.000 kroner om måneden
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Så meget tjener dine kollegaer: Her er alle data fra Computerworlds store it-lønstatistik for 2024
Se alle »
White paper
Teaser billede
Få mere ud af din cloudinfrastruktur og gør op med de konstant stigende omkostninger
Læs mere »
Vejen væk fra WAN: Sådan skifter du til en moderne infrastruktur
Sådan høster du forretningsfordelene ved Internet of Things
Rapport kortlægger de 13 bedste muligheder for at sætte turbo på din cloud computing
Se alle »

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