Bonjour je voulais savoir si c'était possible d'utiliser la fonction DateAdd en vba avec pour date de comparaison la date système par exemple ajouter 6000h à la date système.

Pour le momment j'utilise la macro suivante, mais sa ne marche pas!

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
 
    If Target.Column = 8 Then
 
     If MsgBox("Voulez vous renouveler l'échéance?", vbYesNo) = vbYes Then
        Target.Value = DateAdd("h", 1000, Date)
        Else
        Exit Sub
    End If
 
 
End Sub
La colonne 8 (H) est la colonne ou j'ai ma date et ou je réincrémente du nombre d'heures choisi

Merci!