Vba

Date et l'heure

Date Time

Année, mois, jour d'une date | DateAjouter | Date et heure actuelles | Heure, minute, seconde | Valeur de temps

Apprenez à travailler avec dates et heures dans Excel VBA .



Placer un bouton de commande sur votre feuille de calcul et ajoutez les lignes de code ci-dessous. Pour exécuter les lignes de code, cliquez sur le bouton de commande sur la feuille.



Année, mois, jour d'une date

La macro suivante obtient l'année d'une date. Pour déclarer une date, utilisez l'instruction Dim. Pour initialiser une date, utilisez la fonction DateValue.

Code:



AucunexempleDateComme Date

exampleDate = DateValue ('19 janvier 2020')

MsgBox Année (exempleDate)

Résultat:

Année d'une date dans Excel VBA

Remarque: utilisez le mois et le jour pour obtenir le mois et le jour d'une date.



DateAjouter

Pour ajouter un nombre de jours à une date, utilisez la fonction DateAdd. La fonction DateAdd a trois arguments. Remplissez «d» pour le premier argument pour ajouter des jours. Remplissez 3 pour le deuxième argument pour ajouter 3 jours. Le troisième argument représente la date à laquelle le nombre de jours sera ajouté.

Excel compte le nombre de cellules contenant du texte spécifique

Code:

AucunfirstDateComme Date, secondDateComme Date

firstDate = DateValue ('19 janvier 2020')
secondDate = DateAdd ('d', 3, firstDate)

MsgBox secondDate

Résultat:

DateAjouter

Remarque: remplacez «d» par «m» pour ajouter un nombre de mois à une date. Placez votre curseur sur DateAdd dans Visual Basic Editor et cliquez sur F1 pour obtenir de l'aide sur les autres spécificateurs d'intervalle. Les dates sont au format américain. Mois d'abord, jours ensuite. Ce type de format dépend des paramètres régionaux de Windows.

Date et heure actuelles

Pour obtenir la date et l'heure actuelles, utilisez la fonction Now.

Code:

formule pour calculer les heures dans Excel
MsgBox maintenant

Résultat:

Date et heure actuelles

Heure, minute, seconde

Pour obtenir l'heure d'une heure, utilisez la fonction Heure.

Code:

MsgBox Hour (maintenant)

Résultat:

calculer six mois à partir d'une date

Heure de l'heure actuelle

Remarque: utilisez les minutes et les secondes pour obtenir les minutes et les secondes d'une heure.

Valeur de temps

La fonction TimeValue convertit une chaîne en un numéro de série horaire. Le numéro de série de l'heure est un nombre compris entre 0 et 1. Par exemple, midi (à la moitié de la journée) est représenté par 0,5.

Code:

MsgBox TimeValue ('9:20:01 am')

Résultat:

Valeur de temps

Maintenant, pour voir clairement qu'Excel gère les heures en interne sous forme de nombres compris entre 0 et 1, ajoutez les lignes de code suivantes:

AucunOuiComme Double
y = TimeValue ('09: 20: 01 ')
MsgBox et

Résultat:

Numéro de série de l'heure

1/8 terminé! En savoir plus sur les dates et heures>
Aller au chapitre suivant: Événements



^