Comment utiliser la fonction TimeValue dans VBA (avec exemple)

Vous pouvez utiliser la fonction TimeValue dans VBA pour renvoyer la valeur temporelle d’une chaîne donnée.

Voici une manière courante d’utiliser cette fonction dans la pratique :

Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range("B" & i) = TimeValue(Range("A" & i))
Next i
    
End Sub

Cette macro particulière extraira la valeur temporelle des dates et heures dans la plage A2:A7 et renverra cette valeur temporelle dans la plage correspondante de B2:B7 .

L’exemple suivant montre comment utiliser cette syntaxe dans la pratique.

Exemple : comment utiliser la fonction TimeValue dans VBA

Supposons que nous ayons la colonne de dates/heures suivante dans Excel :

Supposons que nous souhaitions extraire l’heure de chaque datetime dans la colonne A et l’afficher dans la colonne B.

Nous pouvons créer la macro suivante pour ce faire :

Sub GetTimeValue()
    
Dim i As Integer

For i = 2 To 7
    Range("B" & i) = TimeValue(Range("A" & i))
Next i
    
End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

La colonne B affiche la valeur temporelle pour chaque date/heure dans la colonne A.

Par exemple:

• La fonction TimeValue renvoie 10:15:34 à partir du 01/01/2023 10:15:34
• La fonction TimeValue renvoie 12:34:18 PM à partir du 03/01/2023 12:34:18 PM
• La fonction TimeValue renvoie 8:23:00 à partir du 05/01/2023 8:23:00

Et ainsi de suite.

Remarque : Vous pouvez trouver la documentation complète de la fonction TimeValue dans VBA ici .

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

Comment comparer les dates dans VBA
Comment insérer un horodatage à l’aide de VBA
Comment formater l’heure dans VBA