gracias
Private Sub CommandButton1_Click()
Cells(1, 1) = Cells(1, 1) + 1
End Sub
Saludos
"Maverik - Pablo Cisneros" <anon...@discussions.microsoft.com> escribió en
el mensaje news:9ffb01c43475$2d3e6ba0$a601...@phx.gbl...
sub aumenta()
valor = range("a1").value +1
range("a1").value = valor
end sub
>-----Mensaje original-----
>.
>