Afficher la date et l'heure en fonction d'une cellule

Bonjour,

Je suis face a un problème ou je suis limité par mon savoir en excel ...

Je voudrai que quand j’écris un truc dans une cellule ex a2 la date et l'heure s'affiche en a3 définitivement sans ce mettre à jour.

J'ai testé la formule maintenant si a2 est différent de rien mais sa marche pas.

Je vous remercie d'avance.

Bonsoir,

ici, en modifiant dans la colonne "A"

code à placer dans le VBE de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Columns("a")) Is Nothing Then
        If Target.Count > 1 Then Exit Sub
        Target.Offset(0, 1) = Now
    End If
End Sub

maintenant, on peut préciser la plage au lieu de toute la colonne "A"

Amicalement

Claude

Bonjour,

Je suis un peu perdu avec le code.

Je connais rien en Vba pourrait tu m’expliquer comment l’incorporer et sur quoi sa agit.

Merci d''avance.

Bonjour,

Fichier démo

Claude

569cyril91640-date.zip (11.71 Ko)

OK super j'ai compris, me reste plus a savoir comment régler une plage ex si je veux décaler la saisi de l'heure dans Q et le remplissage du nom dans la cellule N en commençant a partir de la ligne 4 jusqu’à l'infinie.

re,

avec option qui efface la date en "Q" si tu efface la colonne "N"

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Columns("n")) Is Nothing Then
        If Target.Count > 1 Or Target.Row < 4 Then Exit Sub 'à partir ligne 4

        If Target = "" Then                                 'si efface "N"
            Target.Offset(0, 3).ClearContents               'efface date
        Else                                                'sinon
            Target.Offset(0, 3) = Now                       'date décaler de 3 colonnes
        End If
    End If
End Sub

Claude

bonjour,

Rechercher des sujets similaires à "afficher date heure fonction"