Om dit te doen, kunt u de volgende basissyntaxis gebruiken:<\/span><\/p>\n Dit specifieke voorbeeld vult alle lege cellen, van cel A2<\/strong> via kolom B<\/strong> tot de laatste rij met een waarde in kolom C.<\/strong><\/span><\/p>\n Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.<\/span><\/p>\n Stel dat we de volgende gegevensset in Excel hebben, waarin de punten worden weergegeven die in verschillende wedstrijden door verschillende basketbalspelers zijn gescoord:<\/span> <\/p>\n Stel dat we de lege cellen in de kolommen A en B willen vullen met de waarden van de cellen erboven.<\/span><\/p>\n We kunnen hiervoor de volgende macro maken:<\/span><\/p>\n Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:<\/span> <\/p>\n Merk op dat alle lege cellen in de kolommen Team<\/strong> en Speler<\/strong> zijn gevuld met de juiste waarde uit de cellen erboven.<\/span><\/p>\n Opmerking<\/strong> : we hebben xlBlanks<\/strong> gebruikt om lege cellen in het bereik te identificeren en vervolgens =R[-1]C<\/strong> gebruikt om de lege cellen te vullen met de waarde van de cel \u00e9\u00e9n rij erboven.<\/span><\/p>\n Het eindresultaat is dat we alle lege cellen konden vullen met de waarde van de cellen erboven.<\/span><\/p>\n In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:<\/span><\/p>\n VBA: controleren of cel leeg is<\/a> Vaak wilt u misschien VBA gebruiken om lege cellen in een Excel-werkblad te vullen met de waarden van de cellen er direct boven. Om dit te doen, kunt u de volgende basissyntaxis gebruiken: Sub Fill_From_Above() With Range(“ A2:B “ & Range(“ C “ & Rows.Count).End(xlUp).Row) .SpecialCells(xlBlanks).FormulaR1C1 = “ =R[-1]C “ .Value = .Value End With […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"class_list":["post-4853","post","type-post","status-publish","format-standard","hentry","category-gids"],"yoast_head":"\n Sub<\/span> Fill_From_Above()\n With<\/span> Range(\" A2:B<\/span> \" & Range(\" C<\/span> \" & Rows.Count).End(xlUp).Row)\n .SpecialCells(xlBlanks).FormulaR1C1 = \" =R[-1]C<\/span> \"\n .Value = .Value\n End With<\/span>\nEnd Sub<\/span><\/strong><\/pre>\n Voorbeeld: Gebruik VBA om lege cellen te vullen met de bovenstaande waarde<\/strong><\/span><\/h2>\n
![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/remplirb1.png\")
<\/p>\n Sub<\/span> Fill_From_Above()\n With<\/span> Range(\" A2:B<\/span> \" & Range(\" C<\/span> \" & Rows.Count).End(xlUp).Row)\n .SpecialCells(xlBlanks).FormulaR1C1 = \" =R[-1]C<\/span> \"\n .Value = .Value\n End With<\/span>\nEnd Sub\n<\/span><\/strong><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/vfill2.png\")
<\/p>\n Aanvullende bronnen<\/strong><\/span><\/h2>\n
VBA: Hoe „Als niet leeg“ te gebruiken<\/a>
VBA: cellen tellen met specifieke tekst<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"