VBA Today-functie
Vandaag betekent de huidige datum, in het werkblad doet de functie Nu hetzelfde dat ons de huidige datum en tijd geeft, maar er is geen ingebouwde functie voor vandaag in VBA zelf, de methode om de huidige datum van het systeem te krijgen is door de datumfunctie te gebruiken en in tegenstelling tot de nu-functie geeft de datumfunctie ons alleen de huidige datum.
In Excel hebben we verschillende handige functies die ons dagelijks kunnen helpen. Excel maakte ons leven op de werkvloer gemakkelijk. Als ik 'dagelijks' zeg, heeft Excel de formule om ook de huidige datum te retourneren, niet alleen de datum, maar we kunnen ook de huidige datum en tijd samen krijgen. Dat is de verscheidenheid aan Excel-formules. Als u een regelmatige gebruiker van Excel bent, hoop ik dat u de formule met de naam "TODAY" in Excel bent tegengekomen om de huidige datum in te voegen zoals weergegeven op uw werkende computer. Maar we hebben geen TODAY-functie in VBA, hoe krijgen we dan de TODAY-datum van VBA. Dit artikel laat zien hoe u met de TODAY-datum in VBA kunt werken. Lees verder.
Wat is de formule om de huidige datum in VBA te krijgen?
Als er geen formule is met de naam VANDAAG, hoe krijgen we dan de datum van vandaag van VBA? Dit is de veel voorkomende vraag die iedereen stelt, maar de oplossing is simpel: we hebben een formule met een andere naam, namelijk de functie DATUM.
Welke datumfunctie doet in VBA?
DATUM is precies hetzelfde als de VBA TODAY-functie, maar dit is geen vluchtige functie, tenzij u de macro uitvoert of de macro activeert.
De syntaxis van de functie DATUM heeft geen argumenten. We hoeven alleen de functie DATE door te geven. Dat is alles.
DATUM ()
Voorbeelden van datumfunctie in VBA
DATUM-functie om de huidige datum van het systeem te retourneren. Dit is erg handig wanneer we dit gebruiken als onderdeel van het grote VBA-project. Om hier een goede kennis van te hebben, zal ik u eenvoudige voorbeelden van de DATUM-functie laten zien.
Voorbeeld 1
Laten we een eenvoudige DATUM-functie maken om de huidige datum in het berichtvenster weer te geven. Volg de onderstaande stappen om de Excel-macro te schrijven.
Stap 1: Maak een subprocedure door de macro een naam te geven.
Stap 2: Declareer de variabele als 'Datum'. De functie DATUM retourneert het resultaat alleen als datum, dus het variabele gegevenstype moet "Datum" zijn.
Code:
Sub Today_Example1 () Dim K As String End Sub
Stap 3: Wijs de waarde toe aan variabele “k” als DATE-functie .
Code:
Sub Today_Example1 () Dim K As String K = Date End Sub
Stap 4: Nu, de waarde van de variabele "k" in het berichtvenster in VBA .
Code:
Sub Today_Example1 () Dim K As String K = Datum MagBox K End Sub
Voer de code uit. We zouden de huidige datum in het systeem moeten zien.
Opmerking: de datumnotatie kan variëren, afhankelijk van de systeeminstellingen. Het kan in 'mm-dd-jj', 'dd-mm-jj' zijn.
Datumfunctie om de vervaldatum te vinden.
De datumfunctie is handiger in de context van het vinden van de vervaldatums van EMI, creditcardbetalingen, verzekeringsbetalingen, enz. …
Stel dat u werkt als een medewerker voor het innen van leningen en dat u een lijst met klanten hebt met hun verschuldigde bedrag en vervaldatum.
In de statuskolom heb je het resultaat nodig als "Vervaldatum is vandaag" als de vervaldatum gelijk is aan de huidige systeemdatum.
Dit kan worden gedaan door de IF-voorwaarde en lussen in VBA te gebruiken. Hieronder vindt u de kant-en-klare code waarmee u tot de resultaten kunt komen.
Code:
Sub Today_Example2 () Dim K As Integer For K = 2 to 11 If Cells (K, 3) .Value = Date Then Cells (K, 4) .Value = "Vervaldatum is vandaag" Else Cells (K, 4) .Value = "Not Today" End If Next K End Sub
Dit komt tot de resultaten in de statuskolom.
Zoals dit in veel scenario's, kunnen we de functie DATUM gebruiken om de datums te controleren en een of andere actie uit te voeren.
U kunt deze VBA Today-functie hier downloaden. VBA Today-functie Excel-sjabloon
