{"id":1573,"date":"2023-11-16T13:22:32","date_gmt":"2023-11-16T13:22:32","guid":{"rendered":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/"},"modified":"2023-12-06T05:58:01","modified_gmt":"2023-12-06T05:58:01","slug":"bescherm-de-werkmap","status":"publish","type":"page","link":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/","title":{"rendered":"Hoe een werkmap beveiligen met vba?"},"content":{"rendered":"<div class=\"excel-voor-de-inhoud\" id=\"excel-1697640111\"><script type=\"text\/javascript\">\r\n\tatOptions = {\r\n\t\t'key' : 'c1158f160081d6540a8409e6925dab94',\r\n\t\t'format' : 'iframe',\r\n\t\t'height' : 250,\r\n\t\t'width' : 300,\r\n\t\t'params' : {}\r\n\t};\r\n<\/script>\r\n<script type=\"text\/javascript\" src=\"\/\/www.highperformanceformat.com\/c1158f160081d6540a8409e6925dab94\/invoke.js\"><\/script><\/div> <p>Om een werkmap te beveiligen, moet u de PROTECT-methode van VBA gebruiken. Met deze methode kunt u een wachtwoord gebruiken of zelfs werkmapbeveiliging zonder wachtwoord inschakelen. Maar er is \u00e9\u00e9n ding waar u rekening mee moet houden bij het wachtwoord dat u gebruikt, namelijk HOOFDGEVOELIG.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Workbook.Protect \"Password\"<\/code><\/pre><ol type=\"1\"><li> Geef de werkmap op die u wilt beveiligen.<\/li><li> Tik en wijs en selecteer de beveiligingsmethode uit de lijst of tik op \u201cBeschermen\u201d.<\/li><li> Voer het wachtwoord in dat u wilt instellen.<\/li><li> Voer de code uit om de werkmap te beveiligen.<\/li><\/ol><p> In deze zelfstudie leren we deze methode op verschillende manieren en leren we ook hoe u de beveiliging van een werkmap opheft.<\/p><p class=\"content-box-grey\"> <em>Handige links: <a href=\"https:\/\/exceladvisor.org\/nl\/voer-een-macro-uit-2\/\">Een macro uitvoeren<\/a> \u2013 <a href=\"https:\/\/exceladvisor.org\/nl\/een-macro-opnemen\/\">Macrorecorder<\/a> \u2013 <a href=\"https:\/\/exceladvisor.org\/nl\/eenvoudige-visuele-editor\/\">Visual Basic Editor<\/a> \u2013 <a href=\"https:\/\/exceladvisor.org\/nl\/persoonlijk-macronotitieboekje\/\">Handboek voor persoonlijke macro&#8217;s<\/a><\/em><\/p><h2 class=\"wp-block-heading\"> Beveilig een werkmap met een wachtwoord<\/h2><p> Hieronder vindt u de code die u moet gebruiken om een werkmap met een wachtwoord te beveiligen. In deze code hebt u eerst de naam van de werkmap en de wachtwoordbeveiligingsmethode.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Workbooks(\"Book1\").Protect \"test123\"<\/code><\/pre><p> En wanneer ik deze code uitvoer, wordt de werkmap &#8220;Book1&#8221; vergrendeld. <\/p><div class=\"wp-block-image\"><figure class=\"aligncenter size-large is-resized\"><img loading=\"lazy\" decoding=\"async\" class=\"wp-image-53290\" src=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png\" sizes=\"auto, \" srcset=\"\" alt=\"het vergrendelt de map book1\" width=\"703\" height=\"282\"><\/figure><\/div><h3 class=\"wp-block-heading\"> Beveilig een werkmap zonder wachtwoord<\/h3><p> En als u een werkmap zonder wachtwoord wilt beveiligen, moet u het argument &#8220;Wachtwoord&#8221; negeren, net als de volgende code.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Workbooks(\"Book1\").Protect<\/code><\/pre><p> Als u een wachtwoordloze werkmap probeert te beveiligen die al met een wachtwoord is beveiligd, geeft Excel een dialoogvenster weer waarin u dat wachtwoord kunt invoeren.<\/p><h2 class=\"wp-block-heading\"> De beveiliging van een werkmap opheffen met een wachtwoord<\/h2><p> Op dezelfde manier kunt u de unprotect-methode gebruiken om de beveiliging van de werkmap op te heffen. De code ervoor ziet er ongeveer als volgt uit.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Workbooks(\"Book1\").Unprotect \"test123\"<\/code><\/pre><p> Er is \u00e9\u00e9n ding waar u op moet letten als u probeert de beveiliging van een werkmap op te heffen die w<\/p><h3 class=\"wp-block-heading\"> De beveiliging van een werkmap zonder wachtwoord opheffen<\/h3><p> En als een werkmap zonder wachtwoord is beveiligd, kunt u dezelfde methode gebruiken zonder het wachtwoordargument op te geven.<\/p><h2 class=\"wp-block-heading\"> Bescherm alle geopende werkmappen<\/h2><p> In de onderstaande code hebben we <a href=\"https:\/\/exceladvisor.org\/nl\/voor-de-lus\/\">een FOR EACH-lus<\/a> om alle geopende werkmappen te doorlopen en elke werkmap \u00e9\u00e9n voor \u00e9\u00e9n te beveiligen met dezelfde beveiligingsmethode.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">'variable to use as a workbook Dim wb As Workbook 'loop through all the open workbooks For Each wb In Application.Workbooks 'condition to check workbook name If wb.Name &lt;&gt; \"PERSONAL.XLSB\" Then 'protect every workbook with a password wb.Protect \"test123\" End If Next wb End Sub<\/code><\/pre><p> Omdat ik de persoonlijke macrowerkmap gebruik, heb ik een <a href=\"https:\/\/exceladvisor.org\/nl\/als-2\/\">IF THEN ELSE-instructie<\/a> gebruikt om te negeren of de naam van de werkmap &#8221; <a href=\"https:\/\/exceladvisor.org\/nl\/persoonlijk-macronotitieboekje\/\">personal.xlsb<\/a> &#8221; is. Zorg er ook voor dat je er zorg voor draagt.<\/p><h2 class=\"wp-block-heading\"> Beveilig een gesloten werkmap<\/h2><p> U kunt ook een gesloten werkmap die op een locatie is opgeslagen, beveiligen of de beveiliging ervan opheffen. Kijk naar de volgende code waarin ik mijn bureaubladlocatie heb gebruikt om het bestand &#8220;test.xlsx&#8221; te gebruiken.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Sub vba_protect_workbook() 'declare varibale to use for the workbook Dim wb As Workbook 'open the workbook that you want to protect Set wb = Workbooks.Open(\"C:UsersDellDesktoptest.xlsx\") 'turn off the screen-updating to _ done everything in the backend Application.ScreenUpdating = False 'protect the workbook wb.Protect 'close the workbook after protecting wb.Close SaveChanges = True 'turn off the screen-updating Application.ScreenUpdating = True End Sub<\/code><\/pre><p> De bovenstaande code gebruikte de Workbook.Open-methode om de werkmap te openen die u wilt beschermen en schakel vervolgens het bijwerken van het scherm uit om in de backend te werken.<\/p><h2 class=\"wp-block-heading\"> Bescherm alle gesloten werkmappen in een map<\/h2><p> De volgende code loopt door alle werkmappen die zich in de map bevinden die u als pad hebt opgegeven. En open vervolgens elke map, bescherm hem en sluit hem \u00e9\u00e9n voor \u00e9\u00e9n.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Sub vba_protect_all_the_workbooks() 'declare variables Dim wb As Workbook Dim myPath As String Dim myFile As String Dim myExtension As String Dim FldrPicker As FileDialog 'optimize macro Application.ScreenUpdating = False Application.EnableEvents = False Application.Calculation = xlCalculationManual 'specify the folder where workbooks are saved myPath = \"C:UsersDellDesktopfolder\" 'jump to reset setting if there's an error On Error GoTo ResetSettings 'target file fxtension (must include wildcard \"*\") myExtension = \"*.xls*\" 'target path myFile = Dir(myPath &amp; myExtension) 'Loop through each Excel file in folder Do While myFile &lt;&gt; \"\" 'Set variable equal to opened workbook Set wb = Workbooks.Open(Filename:=myPath &amp; myFile) 'protect workbook wb.Protect 'Save and Close Workbook wb.Close SaveChanges:=True 'Get next file name myFile = Dir Loop 'Message Box when task is completed MsgBox \"Done!\" 'reset setting that were change for optimization ResetSettings: Application.EnableEvents = True Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True End Sub<\/code><\/pre><div class=\"gb-container gb-container-4db6181c gb-container-mt\"> <a class=\"gb-button gb-button-c5897111 gb-button-text gb-button-mt-button\" href=\"https:\/\/exceladvisor.org\/nl\/vba\/\">Wat is VBA<\/a><h2 class=\"gb-headline gb-headline-665e5f6b gb-headline-text gb-headline-mt-heading\"> Gerelateerde tutorials <\/h2><div class=\"gb-grid-wrapper gb-grid-wrapper-a20baf7c gb-grid-wrapper-mt-grid\"><div class=\"gb-grid-column gb-grid-column-65ddf67e\"><div class=\"gb-container gb-container-65ddf67e\"><ul><li> <a href=\"https:\/\/exceladvisor.org\/nl\/excel-bestand-kopieren\/\">Kopieer een Excel-bestand (werkmap) met VBA<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/werkmap-activeren\/\">VBA Werkmap activeren (Excel-bestand)<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/sluit-de-werkmap\/\">VBA Werkmap sluiten (Excel-bestand)<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/werkmappen-combineren\/\">VBA Combineer werkmappen (Excel-bestanden)<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/maak-een-werkmap\/\">VBA Maak een nieuwe werkmap (Excel-bestand)<\/a><\/li><\/ul><\/div><\/div><\/div><\/div>","protected":false},"excerpt":{"rendered":"","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"open","ping_status":"closed","template":"","meta":{"ub_ctt_via":"","footnotes":""},"class_list":["post-1573","page","type-page","status-publish","hentry"],"featured_image_src":null,"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v25.4 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?<\/title>\n<meta name=\"description\" content=\"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/\" \/>\n<meta property=\"og:locale\" content=\"nl_NL\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?\" \/>\n<meta property=\"og:description\" content=\"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...\" \/>\n<meta property=\"og:url\" content=\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/\" \/>\n<meta property=\"og:site_name\" content=\"Excel Advisor\" \/>\n<meta property=\"article:modified_time\" content=\"2023-12-06T05:58:01+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Geschatte leestijd\" \/>\n\t<meta name=\"twitter:data1\" content=\"4 minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/\",\"url\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/\",\"name\":\"\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?\",\"isPartOf\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage\"},\"image\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage\"},\"thumbnailUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png\",\"datePublished\":\"2023-11-16T13:22:32+00:00\",\"dateModified\":\"2023-12-06T05:58:01+00:00\",\"description\":\"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...\",\"breadcrumb\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#breadcrumb\"},\"inLanguage\":\"nl-NL\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"nl-NL\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage\",\"url\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png\",\"contentUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Thuis\",\"item\":\"https:\/\/exceladvisor.org\/nl\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Hoe een werkmap beveiligen met vba?\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/#website\",\"url\":\"https:\/\/exceladvisor.org\/nl\/\",\"name\":\"Excel Advisor\",\"description\":\"Uw gids voor datadominantie\",\"publisher\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/exceladvisor.org\/nl\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"nl-NL\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/#organization\",\"name\":\"Excel Advisor\",\"url\":\"https:\/\/exceladvisor.org\/nl\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"nl-NL\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/exceladvisor.org\/nl\/wp-content\/uploads\/2023\/12\/exceladvisor.org_.png\",\"contentUrl\":\"https:\/\/exceladvisor.org\/nl\/wp-content\/uploads\/2023\/12\/exceladvisor.org_.png\",\"width\":105,\"height\":36,\"caption\":\"Excel Advisor\"},\"image\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/#\/schema\/logo\/image\/\"}}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?","description":"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/","og_locale":"nl_NL","og_type":"article","og_title":"\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?","og_description":"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...","og_url":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/","og_site_name":"Excel Advisor","article_modified_time":"2023-12-06T05:58:01+00:00","og_image":[{"url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png","type":"","width":"","height":""}],"twitter_card":"summary_large_image","twitter_misc":{"Geschatte leestijd":"4 minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/","url":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/","name":"\u25b7 Hoe beveilig ik een werkmap met VBA in Excel?","isPartOf":{"@id":"https:\/\/exceladvisor.org\/nl\/#website"},"primaryImageOfPage":{"@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage"},"image":{"@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage"},"thumbnailUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png","datePublished":"2023-11-16T13:22:32+00:00","dateModified":"2023-12-06T05:58:01+00:00","description":"In deze zelfstudie wordt uitgelegd hoe u een werkmap kunt beveiligen en de beveiliging ervan kunt opheffen met behulp van een wachtwoord. Ook om een bestand te beveiligen of...","breadcrumb":{"@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#breadcrumb"},"inLanguage":"nl-NL","potentialAction":[{"@type":"ReadAction","target":["https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/"]}]},{"@type":"ImageObject","inLanguage":"nl-NL","@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#primaryimage","url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png","contentUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-il-verrouille-le-classeur-book1.png"},{"@type":"BreadcrumbList","@id":"https:\/\/exceladvisor.org\/nl\/bescherm-de-werkmap\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Thuis","item":"https:\/\/exceladvisor.org\/nl\/"},{"@type":"ListItem","position":2,"name":"Hoe een werkmap beveiligen met vba?"}]},{"@type":"WebSite","@id":"https:\/\/exceladvisor.org\/nl\/#website","url":"https:\/\/exceladvisor.org\/nl\/","name":"Excel Advisor","description":"Uw gids voor datadominantie","publisher":{"@id":"https:\/\/exceladvisor.org\/nl\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/exceladvisor.org\/nl\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"nl-NL"},{"@type":"Organization","@id":"https:\/\/exceladvisor.org\/nl\/#organization","name":"Excel Advisor","url":"https:\/\/exceladvisor.org\/nl\/","logo":{"@type":"ImageObject","inLanguage":"nl-NL","@id":"https:\/\/exceladvisor.org\/nl\/#\/schema\/logo\/image\/","url":"https:\/\/exceladvisor.org\/nl\/wp-content\/uploads\/2023\/12\/exceladvisor.org_.png","contentUrl":"https:\/\/exceladvisor.org\/nl\/wp-content\/uploads\/2023\/12\/exceladvisor.org_.png","width":105,"height":36,"caption":"Excel Advisor"},"image":{"@id":"https:\/\/exceladvisor.org\/nl\/#\/schema\/logo\/image\/"}}]}},"yoast_meta":{"yoast_wpseo_title":"","yoast_wpseo_metadesc":"","yoast_wpseo_canonical":""},"_links":{"self":[{"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages\/1573","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/comments?post=1573"}],"version-history":[{"count":1,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages\/1573\/revisions"}],"predecessor-version":[{"id":2418,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages\/1573\/revisions\/2418"}],"wp:attachment":[{"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/media?parent=1573"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}