{"id":2133,"date":"2023-09-30T03:39:02","date_gmt":"2023-09-30T03:39:02","guid":{"rendered":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/"},"modified":"2023-12-06T05:49:24","modified_gmt":"2023-12-06T05:49:24","slug":"een-kolom-invoegen","status":"publish","type":"page","link":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/","title":{"rendered":"Hoe kolommen invoegen met vba?"},"content":{"rendered":"<div class=\"excel-voor-de-inhoud\" id=\"excel-2097147673\"><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>In deze zelfstudie zullen we zien hoe u een kolom kunt invoegen met behulp van VBA-code in Excel. We zullen ook onderzoeken wat de verschillende manieren zijn om hiervoor een macro te schrijven.<\/p><h2 class=\"wp-block-heading\"> <strong>Voeg een enkele kolom in met VBA<\/strong><\/h2><p> Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &#8220;Gehele kolom&#8221; gebruiken met de methode &#8220;Invoegen&#8221;. Met de eigenschap gehele kolom kunt u met behulp van een cel naar de gehele kolom verwijzen en vervolgens een nieuwe kolom invoegen. Standaard wordt er een kolom ingevoegd v\u00f3\u00f3r de cel die u noemde. <\/p><div class=\"wp-block-image\"><figure class=\"aligncenter size-large is-resized\"><img loading=\"lazy\" decoding=\"async\" class=\"wp-image-54138\" src=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png\" sizes=\"auto, \" srcset=\"\" alt=\"voeg een enkele kolom in met vba\" width=\"580\" height=\"279\"><\/figure><\/div><ol type=\"1\"><li> Geef eerst een cel op met behulp van het bereikobject.<\/li><li> Voer nu een punt (.) in om de lijst met eigenschappen en methoden te krijgen.<\/li><li> Selecteer daarna de eigenschap &#8220;Gehele kolom&#8221; of typ deze.<\/li><li> Voer aan het einde opnieuw een punt (.) in en selecteer de methode &#8220;Invoegen&#8221; of typ deze.<\/li><\/ol><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Range(\"A1\").EntireColumn.Insert<\/code><\/pre><p> Uw code is hier klaar om een kolom in te voegen. Wanneer u deze code nu uitvoert, wordt er onmiddellijk een nieuwe kolom v\u00f3\u00f3r kolom A ingevoegd.<\/p><h2 class=\"wp-block-heading\"> <strong>Meerdere kolommen invoegen<\/strong><\/h2><p> Er zijn twee manieren om meerdere kolommen in een spreadsheet in te voegen die ik heb gevonden. De eerste is dezelfde invoegmethode die we in het bovenstaande voorbeeld hebben gebruikt. Hierbij moet u een kolombereik opgeven waarvan het nummer gelijk is aan het nummer van de kolom die u wilt invoegen.<\/p><p> Stel nu dat u 5 kolommen na kolom C wilt invoegen, voor het geval u code als deze kunt gebruiken. <\/p><div class=\"wp-block-image\"><figure class=\"aligncenter size-large is-resized\"><img loading=\"lazy\" decoding=\"async\" class=\"wp-image-54139\" src=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/2-inserer-plusieurs-colonnes.png\" sizes=\"auto, \" srcset=\"\" alt=\"meerdere kolommen invoegen\" width=\"739\" height=\"301\"><\/figure><\/div><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Range(\"C:G\").EntireColumn.Insert<\/code><\/pre><p> Eerlijk gezegd vond ik deze methode niet erg nuttig, omdat je het bereik moet wijzigen als je de code zelf wilt wijzigen. Dus hier is de tweede methode.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">'variables to use in the code Dim iCol As Long Dim iCount As Long Dim i As Long 'to get the number of columns that you want to insert with an input box iCount = InputBox(Prompt:=\"How many column you want to add?\") 'to get the column number where you want to insert the new column iCol = InputBox _ (Prompt:= _ \"After which column you want to add new column? (Enter the column number)\") 'loop to insert new column(s) For i = 1 To iCount Columns(iCol).EntireColumn.Insert Next i<\/code><\/pre><p> Wanneer u deze code uitvoert, wordt u gevraagd het aantal kolommen in te voeren dat u wilt toevoegen en vervolgens het kolomnummer waaraan u al deze nieuwe kolommen wilt toevoegen. Het gebruikt een <a href=\"https:\/\/exceladvisor.org\/nl\/voor-de-lus\/\">FOR-lus (For Next)<\/a> om het aantal door u genoemde kolommen in te voeren.<\/p><h2 class=\"wp-block-heading\"> <strong>Voeg kolommen in op basis van celwaarden<\/strong><\/h2><p> Als u kolommen wilt invoegen op basis van een celwaarde, kunt u de volgende code gebruiken.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Dim iCol As Long Dim iCount As Long Dim i As Long iCount = Range(\"A1\").Value iCol = Range(\"B1\").Value For i = 1 To iCount Columns(iCol).EntireColumn.Insert Next i<\/code><\/pre><p> Wanneer u deze macro uitvoert, wordt het aantal kolommen uit cel A1 gebruikt en de kolom waaraan u kolommen wilt toevoegen uit cel B1.<\/p><h2 class=\"wp-block-heading\"> <strong>Voeg een kolom in zonder opmaak<\/strong><\/h2><p> Wanneer u een kolom invoegt waarvan de kolom erboven een specifieke opmaak heeft, krijgt de kolom in dat geval automatisch ook die opmaak. En de eenvoudigste manier om met deze situatie om te gaan, is door duidelijke formaten te gebruiken. Beschouw de volgende code.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Columns(7).EntireColumn.Insert Columns(7).ClearFormats<\/code><\/pre><p> Wanneer u de bovenstaande code uitvoert, wordt er een nieuwe kolom ingevoegd v\u00f3\u00f3r de <sup>7e<\/sup> kolom. Wat er nu gebeurt, is dat wanneer u een kolom v\u00f3\u00f3r de <sup>7e<\/sup> kolom invoegt, deze nieuwe kolom de <sup>7e<\/sup> kolom wordt, waarna de tweede regel code de formaten ervan verwijdert.<\/p><h2 class=\"wp-block-heading\"> <strong>Voeg een gekopieerde kolom in<\/strong><\/h2><p> U kunt dezelfde methode ook gebruiken om een kolom te kopi\u00ebren en deze vervolgens ergens anders in te voegen. Zie de volgende code.<\/p><pre class=\"wp-block-code\"> <code class=\"language-visual-basic\" lang=\"visual-basic\">Application.CutCopyMode = False With Worksheets(\"Data\") .Columns(5).Copy .Columns(9).Insert Shift:=xlShiftDown End With Application.CutCopyMode = True<\/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\/aantal-lijnen\/\">Tel rijen met VBA in Excel<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/karakter-lettertype\/\">Excel VBA-lettertype (kleur, grootte, type en vetgedrukt)<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/verberg-toon-kolomrij\/\">Excel VBA Verberg en toon een kolom of rij<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/bereik-1\/\">Excel VBA-bereik &#8211; Werken met bereik en cellen<\/a><\/li><li> <a href=\"https:\/\/exceladvisor.org\/nl\/grenzen\/\">Pas randen toe op een cel met VBA in Excel<\/a> <\/li><\/ul><\/div><\/div><div class=\"gb-grid-column gb-grid-column-50067b57\"><div class=\"gb-container gb-container-50067b57\"><\/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-2133","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 kolommen invoegen met VBA in Excel?<\/title>\n<meta name=\"description\" content=\"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.\" \/>\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\/een-kolom-invoegen\/\" \/>\n<meta property=\"og:locale\" content=\"nl_NL\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"\u25b7 Hoe kolommen invoegen met VBA in Excel?\" \/>\n<meta property=\"og:description\" content=\"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/\" \/>\n<meta property=\"og:site_name\" content=\"Excel Advisor\" \/>\n<meta property=\"article:modified_time\" content=\"2023-12-06T05:49:24+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.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=\"3 minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"WebPage\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/\",\"url\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/\",\"name\":\"\u25b7 Hoe kolommen invoegen met VBA in Excel?\",\"isPartOf\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage\"},\"image\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage\"},\"thumbnailUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png\",\"datePublished\":\"2023-09-30T03:39:02+00:00\",\"dateModified\":\"2023-12-06T05:49:24+00:00\",\"description\":\"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.\",\"breadcrumb\":{\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#breadcrumb\"},\"inLanguage\":\"nl-NL\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"nl-NL\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage\",\"url\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png\",\"contentUrl\":\"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Thuis\",\"item\":\"https:\/\/exceladvisor.org\/nl\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Hoe kolommen invoegen 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 kolommen invoegen met VBA in Excel?","description":"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.","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\/een-kolom-invoegen\/","og_locale":"nl_NL","og_type":"article","og_title":"\u25b7 Hoe kolommen invoegen met VBA in Excel?","og_description":"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.","og_url":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/","og_site_name":"Excel Advisor","article_modified_time":"2023-12-06T05:49:24+00:00","og_image":[{"url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png","type":"","width":"","height":""}],"twitter_card":"summary_large_image","twitter_misc":{"Geschatte leestijd":"3 minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"WebPage","@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/","url":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/","name":"\u25b7 Hoe kolommen invoegen met VBA in Excel?","isPartOf":{"@id":"https:\/\/exceladvisor.org\/nl\/#website"},"primaryImageOfPage":{"@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage"},"image":{"@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage"},"thumbnailUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png","datePublished":"2023-09-30T03:39:02+00:00","dateModified":"2023-12-06T05:49:24+00:00","description":"Om een kolom in te voegen met behulp van VBA-code, moet u de eigenschap &quot;Entire Column&quot; gebruiken met de &quot;Insert&quot; -methode.","breadcrumb":{"@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#breadcrumb"},"inLanguage":"nl-NL","potentialAction":[{"@type":"ReadAction","target":["https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/"]}]},{"@type":"ImageObject","inLanguage":"nl-NL","@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#primaryimage","url":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png","contentUrl":"https:\/\/exceladvisor.org\/wp-content\/uploads\/2023\/08\/1-inserer-une-seule-colonne-en-utilisant-vba.png"},{"@type":"BreadcrumbList","@id":"https:\/\/exceladvisor.org\/nl\/een-kolom-invoegen\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Thuis","item":"https:\/\/exceladvisor.org\/nl\/"},{"@type":"ListItem","position":2,"name":"Hoe kolommen invoegen 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\/2133","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=2133"}],"version-history":[{"count":1,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages\/2133\/revisions"}],"predecessor-version":[{"id":2614,"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/pages\/2133\/revisions\/2614"}],"wp:attachment":[{"href":"https:\/\/exceladvisor.org\/nl\/wp-json\/wp\/v2\/media?parent=2133"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}