Caso essa maneira não siga sua idéia, tentaremos de outra.
No macro em que você executará, coloque a linha de comando abaixo no final dele:
Range("A1").Value = Range("A1").Value + 1
MsgBox ("Execuções: " & Range("A1").Value)
Crie um módulo para que ao final de todo o processo de contagem, você possa zerar esta.
Sub Zerar_Macro()
Range("A1").Value = 0
End Sub
A idéia do macro é a seguinte:
Toda vez que executar a macro, a célula A1 somará 1 unidade.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 22/12/2010 11:58 am