Ajout d'une date

Bonjour

Je sollicite votre aide sur un problème. Pour info je débute sur excel.

J'ai une date en C1 sur la feuil1 qui est changée de temps en temps.

Cette date est renvoyé sur la feuil2 en A2 (=Feuil1!C1)

Quand la date de C1 change, je souhaiterai qu'elle soit mise en A3, de la feuil 2, mais aussi garder l'ancienne valeur en A2 et ainsi de suite à chaque changement de date.

Merci pour suggestions.

Bonne journée

Brice

Bonjour,

Veux-tu mettre un classeur modèle, qui permette de te fournir une réponse.

Cordialement.

Pardon,

Voici le document avec commentaires, j'espère avoir été clair.

Merci

Brice

Bonjour,

Cela peut se faire via une macro qui se déclenche à chaque changement de valeur dans la cellule C de ton premier onglet.

Le code à insérer sur ta feuille est :

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Application.Intersect(Target, Sheets("Feuil1").Range("C1")) Is Nothing Then
 Dernière_Ligne = Sheets("Feuil2").UsedRange.Rows.Count + 1
     Sheets("Feuil2").Range("A" & Dernière_Ligne) = Sheets("Feuil1").Range("C1")
 End If
End Sub

Je te joins le fichier

Merci beaucoup, c'est exactement ce que je voulais !!

Bonne journée

Brice

Bonjour,

Je l'aurais écrit ainsi (mais la version de ouisans doute fonctionnera...)

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim n%
    If Target.Address = "$C$1" Then
        With Worksheets("Feuil2")
            n = 2
            Do While .Cells(n, 1) <> ""
                n = n + 1
            Loop
            .Cells(n, 1) = Target
        End With
    End If
End Sub

Cordialement.

Bonjour MFerrand

J'aime bien ta syntaxe, moins lourde que la mienne.

C'est beaucoup plus élégant, je pense que je vais l'adopter à moins que tu me dises dans quels cas le If not Application serait plus pertinent.

Une autre petite question (j'en profite) que signifie le % dernière la déclaration de n ?

Merci

Bonjour ouisansdoute !

Tester l'intersection est le cas général, cela peut donc toujours s'utiliser !

Mais dès lors que tu n'as qu'une seule cellule, le test sur l'adresse peut être plus commode...

N'oublie pas non plus que, étant sur Feuil1, Me te permet de la désigner sans ambiguïté...

(J'ai préféré par ailleurs chercher la ligne cible à partir de A2 pour plus de fiabilité au démarrage, mais cela devient indifférent une fois démarré...)

Cordialement.

Merci encore pour la macro.

Je voudrai toutefois modifier la cellule ou est transférer la date.

Passer de A2 à F3 par exemple.

Dans la macro, il me semble que c'est n qui désigne la colonne mais je ne sais pas comment le modifier?

Merci d'avance

Brice

répondu à ton mail...