Hvordan beskyttes alle regneark automatisk, når Excel-projektmappen lukkes?
Normalt kan du manuelt beskytte et regneark eller hele projektmappen med adgangskode med funktionen Beskyt ark eller Beskyt projektmappe i Excel. Men hvis du vil beskytte alle regneark automatisk med adgangskode, når projektmappen lukkes, hvad kan du gøre? Denne artikel viser dig en VBA-metode til at opnå det.
Beskyt alle regneark, når du lukker Excel-projektmappen med VBA-kode
Beskyt alle regneark, når du lukker Excel-projektmappen med VBA-kode
For at beskytte alle regneark automatisk, når du lukker projektmappen, skal du anvende følgende VBA-kode.
1. I projektmappen skal du beskytte alle regneark, når du lukker filen, skal du trykke på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer dobbeltklik på ThisWorkbook i venstre rude, og kopier derefter under VBA-kode til kodevinduet. Se skærmbillede:
VBA-kode: Beskyt alle regneark, når du lukker projektmappen
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Update by Extendoffice 2018/1/24
Dim xSheet As Worksheet
Dim xPsw As String
xPsw = ""
For Each xSheet In Worksheets
xSheet.Protect xPsw
Next
End Sub
Tips:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Sheet1").Protect "123"
ActiveWorkbook.Save
End Sub
3. Tryk derefter på andre + Q taster for at lukke vinduet Microsoft Visual Basic for Applications.
Efter ovenstående trin beskyttes alle regneark eller specificeret regneark automatisk, når du lukker projektmappen.
Noter:
Relaterede artikler:
- Hvordan bruges rullelisten i et beskyttet regneark i Excel?
- Hvordan låses angivne celler uden at beskytte hele regnearket i Excel?
- Hvordan skjules formel, men viser resultatet uden at beskytte regneark i Excel?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!