Discussion :

[juliien]

Bonjour à tous,

Je souhaite ajouter une ligne à un tableau chaque jour qui passe.
Je suis vraiment novice en VBA mais j'ai crut comprendre qu'il fallait utiliser la fontion: Private Sub Worksheet_Calculate() puisque j'avait dans l'idée d'ajouter une ligne de tableau à chaque modification d'une cellule dans laquelle j'aurai incéré la date.

Si quelqu'un à des éléments de réponse je lui serait extrêmement reconnaissant.

Bon réveillon à tous,

Julien

[Kimy_Ire]

Bonjour juliien,

Alors il y a trop peu d'explications pour que je puisse te proposer quelque chose de fonctionnel.
Ainsi, je te propose d'utiliser l'événement suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
    'ton code
End If
 
End Sub

Ce bout de code permet de vérifier le changement d'une cellule (ici "A1").
Tu peux ajouter des vérifications sur la formalisme par exemple, etc...

N'hésite pas à revenir vers moi pour tout complément.

Cordialement,
Kimy

[SfJ5Rpw8]

Bonjour,

de qu'elle façon modifie tu la date dans ta cellule "date" ?

[juliien]

Bonjour Kimy et Bbil,

Merci pour vos réponses. Le programme que je cherche a réaliser rajoute tous les jours une ligne à un tableau des comptes, avec 3 colonnes dont le numéro du jour de l'année, le numéro de compte et le solde du compte.

Mon idée première était d'ajouter une ligne à chaque changement de la date d'une case (définit par =AUJOURDHUI() ) mais il me semble que ce changement est un "recalcul" c'est à dire que ce n'est pas l'utilisateur qui intervient directement pour changer la case, donc que la fonction Worksheet_Change ne pouvait fonctionner dans ce cas.

Merci pour vos aides précieuses,

Julien

[SfJ5Rpw8]

Bonjour,

oui tu peu faire cela dans la procédure événementielle Calculate , il te faut réserver une autre cellule pour mémoriser la dernière date traitée, ensuite à chaque appel de calculate tu compare la date courante avec la date mémorisé et si différent tu mémorise la date et effectue l'ajout de ta ligne...

[juliien]

Super solution!

Merci et bonne continuation.