DDE - Change Calculate

Question

E ae Pessoal,  tenho um campo com um Link DDE e gostaria de fazer o seguinte,  uma macro que lê o campo toda vez que ele for atualizado pelo DDE.

Com o evento Worksheet_Calculate() consegui que ele seja gerado cada vez q o DDE atualizar, porem nao conseguir capturar o campo que gerou o evento. COmo são mais de 10 campos atualizados, é fundamental saber qual foi atualizado.

 

 

Valew 

Answer 1

Oi PDH,

você capturar o endereço da célula alterada usando o evento Change:

 

Option Explicit

Dim rngUpdated As Range

Private Sub Worksheet_Calculate()
MsgBox "Célula atualizada: " & rngUpdated.Address(False, False)
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
Set rngUpdated = Target
'Seu código...
End Sub