Hier volgt een gebruikelijke manier om deze eigenschap in de praktijk te gebruiken:<\/span><\/p>\n Deze specifieke macro zoekt de maand en het jaar voor elke datum in het bereik A2:A11<\/strong> en geeft deze waarden weer in de overeenkomstige cellen in het bereik C2:C11<\/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 die informatie bevat over de verkopen van een bedrijf op verschillende data:<\/span> <\/p>\n Stel dat we voor elke cel in de datumkolom de maand en het jaar willen weten.<\/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 kolom C de maand en het jaar bevat van elke overeenkomstige datum in kolom A.<\/span><\/p>\n Houd er rekening mee dat we de eigenschap NumberFormat<\/strong> hebben gebruikt om datums op te maken met twee cijfers voor maanden en vier cijfers voor jaren.<\/span><\/span><\/p>\n We zouden ervoor kunnen kiezen om deze waarden in een ander formaat weer te geven als we dat wilden.<\/span><\/p>\n We kunnen bijvoorbeeld de volgende syntaxis gebruiken om de maand met \u00e9\u00e9n cijfer weer te geven (als de maand slechts \u00e9\u00e9n cijfer bevat) en het jaar met twee cijfers:<\/span><\/p>\n Wanneer we deze macro uitvoeren, ontvangen we de volgende uitvoer:<\/span> <\/p>\n Speel gerust met de verschillende opmaakopties om de maand- en jaarwaarden naar wens weer te geven.<\/span><\/p>\n In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:<\/span><\/p>\n Datums vergelijken in VBA<\/a> U kunt de eigenschap NumberFormat in VBA gebruiken om de maand en het jaar uit een datum te halen. Hier volgt een gebruikelijke manier om deze eigenschap in de praktijk te gebruiken: SubGetMonthYear () Dim i As Integer For i = 2 To 11 Range(“ C “ & i).Value = DateValue(Range(“ A “ & i)) […]<\/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-4783","post","type-post","status-publish","format-standard","hentry","category-gids"],"yoast_head":"\n SubGetMonthYear<\/span> ()\n\nDim<\/span> i As<\/span> Integer\n\nFor<\/span> i = 2 To<\/span> 11\n Range(\" C<\/span> \" & i).Value = DateValue(Range(\" A<\/span> \" & i))\n Range(\" C<\/span> \" & i).NumberFormat = \" mm\/yyyy<\/span> \"\nNext<\/span> i\n\nEnd Sub\n<\/span><\/strong><\/span><\/pre>\n Voorbeeld: Voeg dagen toe aan deze dag in VBA<\/strong><\/span><\/h2>\n
![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/premierv1.png\")
<\/p>\n SubGetMonthYear<\/span> ()\n\nDim<\/span> i As<\/span> Integer\n\nFor<\/span> i = 2 To<\/span> 11\n Range(\" C<\/span> \" & i).Value = DateValue(Range(\" A<\/span> \" & i))\n Range(\" C<\/span> \" & i).NumberFormat = \" mm\/yyyy<\/span> \"\nNext<\/span> i\n\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/mon1.png\")
<\/p>\n SubGetMonthYear<\/span> ()\n\nDim<\/span> i As<\/span> Integer\n\nFor<\/span> i = 2 To<\/span> 11\n Range(\" C<\/span> \" & i).Value = DateValue(Range(\" A<\/span> \" & i))\n Range(\" C<\/span> \" & i).NumberFormat = \" m\/yy<\/span> \"\nNext<\/span> i\n\nEnd Sub<\/span><\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/mon2.png\")
<\/p>\n Aanvullende bronnen<\/strong><\/span><\/h2>\n
Hoe string naar datum te converteren in VBA<\/a>
Hoe dagen tussen twee datums in VBA te berekenen<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"