date de modification d'un autre fichier

re bonjour

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 24 And Target.Row = 6 Then
sheets(3).Range("A1").Value = "Date de la dernière modification le " & Now
End If
End Sub

Grace à ce code si la cellule "X6" change dans la feuille 1 d'un fichier A, une date de modif apparait en "A1" dans la feuille 3 du fichier A
maintenant est-il possible qu'une cellule "X6" change dans la feuille 1 d'un fichier B et la date de modif apparait toujours en "A1" dans la feuille 3 du fichier A?

quelqu'un a t'il une idée de la solution?

si le classeur est ouvert
fichier A!feuille 3.range("A1").value = .....

A+

Avec Application.run, tu devrais pouvoir lancer une macro qui fait ça sur ton fichier B. Regarde à run, dans l'aide.

RE Yoooo,

Sinon les 2 fichiers sont ouverts:

Sur la feuille 1 du classeur B copier ce code :

Code:

---

1 2 3 4 5

Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 24 And Target.Row = 6 Then Workbooks("A").Sheets(3).Range("A1").Value = "Date de la dernière modification le " & Now End If End Sub

---