Discussion :

[Jean-Philippe André]

Hello,

je travaille sur des feuilles Excel alimentées en données boursières. Une des colonnes contient un horodatage qui m'intéresse ici.

J'ai des formules dans chacune des cellules, mais aucune modification en dehors de ces plages n'est effectuée.

J'ai cru comprendre que le changement de valeur retournée par une fonction n'est pas détectée par l'évènement Worksheet_Change(), aussi j'aurais aimé avoir vos pistes de reflexion pour gérer ceci.

Merci bien

JP

[Daniel.C]

Bonjour,

Un bricolage (j'ai pris la plage A1:F50 de Feuil1 pour l'exemple) :
1. dans un module :

Code :

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

Public Tabl

2. dans le module "thisworkbook" :

Code :

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

1
2
3
4
5
6
 
Private Sub Workbook_Open()
    With Application
        Tabl = .Transpose(.Transpose([Feuil1!A1:F50]))
    End With
End Sub

3. dans le module de la feuille contenant la plage des formules (ici Feuil1) :

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_Calculate()
    For ligne = 1 To [A1:F50].Row
        For col = 1 To [A1:F50].Column
            If Cells(ligne, col) <> Tabl(ligne, col) Then
                'traitement de la différence
                Tabl(ligne, col) = Cells(ligne, col)
            End If
        Next col
    Next ligne
End Sub

[Jean-Philippe André]

OK, je regarde cela.

[Supermichou]

Bonsoir,

le sujet m'interresse aussi car j'ai la même problématique avec une liaison dde.
je l'ai résolu partiellement en lançant une macro qui check si la valeur a pas changé depuis la dernière fois.
ça marche, mais si une celulle est en cours de saisie, ça "pause" le lancement de la macro.
Je bosse toujours dessus. A suivre.

[Jean-Philippe André]

Hello,

en fait je gère la feuille Excel depuis une appli vb.net

Et l'évènement qui est finalement utilisé est Workbook_SheetCalculate().

Je récupère d'un coup la ligne et lance un thread pour libérer le focus