Methode 1: Markeer de actieve cel<\/strong><\/span><\/p>\n Deze specifieke macro markeert de momenteel actieve cel met een gele achtergrond.<\/span><\/p>\n Methode 2: Markeer celbereik<\/strong><\/span><\/p>\n Deze specifieke macro markeert elke cel in het bereik B2:B10<\/strong> met een gele achtergrond.<\/span><\/p>\n Methode 3: Markeer het celbereik op basis van criteria<\/strong><\/span><\/p>\n Deze specifieke macro markeert elke cel in het bereik B2:B10<\/strong> met een waarde groter dan 20.<\/span><\/p>\n De volgende voorbeelden laten zien hoe u elke methode in de praktijk kunt gebruiken met de volgende gegevensset in Excel:<\/span> <\/p>\n Stel dat cel B3<\/strong> momenteel is geselecteerd.<\/span><\/p>\n We kunnen de volgende macro maken om deze actieve cel te markeren:<\/span><\/p>\n Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:<\/span> <\/p>\n Merk op dat cel B3<\/strong> is gemarkeerd en dat alle andere cellen gewoon onaangeroerd blijven.<\/span><\/p>\n Stel dat we elke cel in het bereik B2:B10<\/strong> willen markeren.<\/span><\/p>\n We kunnen hiervoor de volgende macro maken:<\/span><\/p>\n Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:<\/span><\/span> <\/p>\n Merk op dat elke cel in het bereik B2:B10<\/strong> gemarkeerd is en dat alle andere cellen onaangeroerd blijven.<\/span><\/p>\n Stel dat we elke cel in het bereik B2:B10<\/strong> met een waarde groter dan 20 willen markeren.<\/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 Houd er rekening mee dat elke cel in het bereik B2:B10<\/strong> met een waarde groter dan 20 wordt gemarkeerd en dat alle andere cellen onaangeroerd blijven.<\/span><\/p>\n In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:<\/span><\/p>\n VBA: voorwaardelijke opmaak op cellen toepassen<\/a> U kunt in VBA de volgende methoden gebruiken om cellen te markeren: Methode 1: Markeer de actieve cel SubHighlightActiveCell () ActiveCell.Interior.Color = vbYellow End Sub Deze specifieke macro markeert de momenteel actieve cel met een gele achtergrond. Methode 2: Markeer celbereik SubHighlightRange () Range(“ B2:B10 „).Interior.Color = vbYellow End Sub Deze specifieke macro markeert elke […]<\/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-4427","post","type-post","status-publish","format-standard","hentry","category-gids"],"yoast_head":"\n SubHighlightActiveCell<\/span> ()\nActiveCell.Interior.Color = vbYellow\nEnd Sub\n<\/span><\/strong><\/span><\/pre>\n SubHighlightRange<\/span> ()\nRange(\" B2:B10<\/span> \").Interior.Color = vbYellow\nEnd Sub\n<\/span><\/strong><\/span><\/pre>\n SubHighlightRangeBasedOnCriteria<\/span> ()\n\n Dim<\/span> rng As<\/span> Range\n \n For Each<\/span> rng In<\/span> Range(\" B2:B10<\/span> \")\n \n If<\/span> rng.Value > 20 Then<\/span>\n rng.Interior.Color = vbYellow\n End If<\/span>\n \n Next<\/span> rng\n \nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/euh1.jpg\")
<\/p>\n Voorbeeld 1: Markeer de actieve cel<\/strong><\/span><\/h2>\n
SubHighlightActiveCell<\/span> ()\nActiveCell.Interior.Color = vbYellow\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"VBA](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/ha1.jpg\")
<\/p>\n Voorbeeld 2: Markeer een celbereik<\/strong><\/span><\/h2>\n
SubHighlightRange<\/span> ()\nRange(\" B2:B10<\/span> \").Interior.Color = vbYellow\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"VBA](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/ha2.jpg\")
<\/p>\n Voorbeeld 3: Markeer een celbereik op basis van criteria<\/strong><\/span><\/h2>\n
SubHighlightRangeBasedOnCriteria<\/span> ()\n\n Dim<\/span> rng As<\/span> Range\n \n For Each<\/span> rng In<\/span> Range(\" B2:B10<\/span> \")\n \n If<\/span> rng.Value > 20 Then<\/span>\n rng.Interior.Color = vbYellow\n End If<\/span>\n \n Next<\/span> rng\n \nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"VBA](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/ha3.jpg\")
<\/p>\n Aanvullende bronnen<\/strong><\/span><\/h2>\n
VBA: voorwaardelijke opmaak toepassen op dubbele waarden<\/a>
VBA: hoe u de waarde in een kolom kunt vinden<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"