Fonction now

[Tom32]

Bonjour,

Qund j`entre une valeur dans la colonne C, je voudrais que la date et l`heure s`inserent automatiquement, respectivement dans les colonnes A et B.

Pour ceci, j`ai utilise la fonction suivante :

=IF(C5="","",NOW())

Le probleme est que la fonction NOW est une fonction volatile et que des que je change une information dans la ligne et encore plus important dans les autres ligne, la date et l`heure changent. Finallement, a la fin, je me retrouve avec un tableau contenant une seule et meme date et heure.

Comment fixer cette heure et cette date de sorte que des que j`entre une valeur dans la colonne C, la date et l`heure s`inscrivent dans les colonnes A et B et ne bougent plus du tout ?

Si quelqu`un a une solution merci de m`en faire part !

 

[bouley]

Re : Fonction now

bonjour tom32,

ecris ceci dans le code de la feuille concernée.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("C:C")) Is Nothing Then
    If Target.Value <> "" Then
    Target.Offset(0, -1).Value = Format(Now(), "hh:nn:ss")
    Target.Offset(0, -2).Value = Date
    Else
    Target.Offset(0, -1).Value = ""
    Target.Offset(0, -2).Value = ""
    End If
End If
End Sub

@+

 

[Tom32]

Re : Fonction now

Oui c`est bon ca fonctionne

Merci beaucoup