Ett makro för att skydda arbetsblad på arbetsbok Stäng

Ibland behöver du skicka din Excel-arbetsbok ut i världen med specifika kalkylblad skyddade. Om du upptäcker att du ständigt skyddar och avskyddar ark innan du distribuerar dina arbetsböcker, kan makrot här hjälpa dig.

Hur makrot fungerar

Koden utlöses av arbetsbokens BeforeClose-händelse. När du försöker stänga arbetsboken utlöses den här händelsen och kör koden inom. Makrot skyddar automatiskt det angivna arket med det angivna lösenordet och sparar sedan arbetsboken:

Privat underarbetsbok_BeforeClose(Avbryt som boolesk)
'Steg 1: Skydda arket med ett lösenord
     Sheets("Sheet1"). Skydda lösenord:="RED"
'Steg 2: Spara arbetsboken
     ActiveWorkbook.Save
Avsluta Sub

I steg 1 anger du uttryckligen vilket blad som ska skyddas — Blad1, i det här fallet. Du anger också lösenordsargumentet, Password:=”RED”, som definierar lösenordet som behövs för att ta bort skyddet.

Detta lösenordsargument är valfritt. Om du utelämnar det kommer arket fortfarande att vara skyddat, men du behöver inget lösenord för att ta bort skyddet.

Excel-lösenord är skiftlägeskänsliga, så du bör vara uppmärksam på det exakta lösenordet och versaler som du använder.

Steg 2 säger åt Excel att spara arbetsboken. Om du inte sparar arbetsboken kommer det arkskydd du precis har tillämpat inte att gälla nästa gång arbetsboken öppnas.

Hur man använder makrot

För att implementera detta makro måste du kopiera och klistra in det i Workbook_BeforeClose-händelsekodfönstret. Om du placerar makrot här kan det köras varje gång du försöker stänga arbetsboken:

Aktivera Visual Basic Editor genom att trycka på Alt+F11.

I projektfönstret hittar du ditt projekt-/arbetsboksnamn och klickar på plustecknet bredvid för att se alla ark.

Klicka på ThisWorkbook.

I listrutan Händelse väljer du händelsen BeforeClose.

Skriv eller klistra in koden i den nyskapade modulen, ändra arknamnet (om nödvändigt) och lösenordet.

Ett makro för att skydda arbetsblad på arbetsbok Stäng

Ange din kod i händelsen Workbook BeforeClose.

Observera att du kan skydda ytterligare ark genom att lägga till tilläggssatser före Activeworkbook.Save-satsen.


Hur man blockerar Microsoft Word från att öppna filer i skrivskyddat läge på Windows

Hur man blockerar Microsoft Word från att öppna filer i skrivskyddat läge på Windows

Hur man blockerar Microsoft Word från att öppna filer i skrivskyddat läge på Windows Microsoft Word öppnar filer i skrivskyddat läge, vilket gör det omöjligt att redigera dem? Oroa dig inte, metoderna finns nedan

Hur man åtgärdar felaktig utskrift av Microsoft Word-dokument

Hur man åtgärdar felaktig utskrift av Microsoft Word-dokument

Så här åtgärdar du fel vid utskrift av felaktiga Microsoft Word-dokument Fel vid utskrift av Word-dokument med ändrade teckensnitt, röriga stycken, saknad text eller förlorat innehåll är ganska vanligt. Men gör det inte

Radera ritningar med penna och överstrykningspenna på dina PowerPoint-bilder

Radera ritningar med penna och överstrykningspenna på dina PowerPoint-bilder

Om du har använt pennan eller överstrykningspennan för att rita på dina PowerPoint-bilder under en presentation, kan du spara ritningarna till nästa presentation eller radera dem så att nästa gång du visar den börjar du med rena PowerPoint-bilder. Följ dessa instruktioner för att radera ritningar med penna och överstrykningspenna: Radera linjer ett på […]

Stilbiblioteksinnehåll i SharePoint 2010

Stilbiblioteksinnehåll i SharePoint 2010

Stilbiblioteket innehåller CSS-filer, XSL-filer (Extensible Stylesheet Language) och bilder som används av fördefinierade mallsidor, sidlayouter och kontroller i SharePoint 2010. För att hitta CSS-filer i stilbiblioteket på en publiceringswebbplats: Välj Webbplatsåtgärder→Visa Allt webbplatsinnehåll. Innehållet på webbplatsen visas. Style-biblioteket ligger i […]

Formatera siffror i tusentals och miljoner i Excel-rapporter

Formatera siffror i tusentals och miljoner i Excel-rapporter

Överväldiga inte din publik med gigantiska siffror. I Microsoft Excel kan du förbättra läsbarheten för dina instrumentpaneler och rapporter genom att formatera dina siffror så att de visas i tusentals eller miljoner.

Hur man delar och följer SharePoint-webbplatser

Hur man delar och följer SharePoint-webbplatser

Lär dig hur du använder SharePoints sociala nätverksverktyg som låter individer och grupper kommunicera, samarbeta, dela och ansluta.

Hur man konverterar datum till Julian-format i Excel

Hur man konverterar datum till Julian-format i Excel

Julianska datum används ofta i tillverkningsmiljöer som en tidsstämpel och snabbreferens för ett batchnummer. Denna typ av datumkodning tillåter återförsäljare, konsumenter och serviceagenter att identifiera när en produkt tillverkades och därmed produktens ålder. Julianska datum används också i programmering, militären och astronomi. Annorlunda […]

Hur man skapar en Access Web App

Hur man skapar en Access Web App

Du kan skapa en webbapp i Access 2016. Så vad är en webbapp egentligen? Tja, webben betyder att den är online, och appen är bara en förkortning för "applikation". En anpassad webbapp är en onlinedatabasapplikation som nås från molnet med en webbläsare. Du bygger och underhåller webbappen i skrivbordsversionen […]

Snabbstartsfält i SharePoint 2010

Snabbstartsfält i SharePoint 2010

De flesta sidor i SharePoint 2010 visar en lista med navigeringslänkar i snabbstartsfältet till vänster på sidan. Snabbstartsfältet visar länkar till utvalt webbplatsinnehåll som listor, bibliotek, webbplatser och publiceringssidor. Snabbstartsfältet innehåller två mycket viktiga länkar: Länken Allt webbplatsinnehåll: […]

Vad betyder lösarens felmeddelanden i Excel?

Vad betyder lösarens felmeddelanden i Excel?

För enkla problem hittar Solver i Excel vanligtvis snabbt de optimala Solver-variabelvärdena för objektivfunktionen. Men i vissa fall har Solver problem med att hitta Solver-variabelvärdena som optimerar objektivfunktionen. I dessa fall visar Solver vanligtvis ett meddelande eller ett felmeddelande som beskriver eller diskuterar problemet som […]