Forums Últimos mensajes - Powered by IBM
 

Introducir un retardo en una macro

14/02/2007 - 12:08 por rgg27 | Informe spam
Necesito ralentizar una macro para que el proceso se vea lentamente.
No se trata de introducir un retardo en la ejecución y que luego se
procese rapidamente, sino de que se vea lentamente todo el proceso.
La macro es:
Sub Calcula_Bruto_Garantizado()

Dim inferior As Double
Dim coeficiente As Double
Dim superior As Double

inferior = -10000
coeficiente = 0
superior = 10000

Range("R16").Value = coeficiente

Do While (Abs(Range("R14").Value) >= 0.001)
If Range("R14").Value > 0 Then
superior = coeficiente
coeficiente = (coeficiente + inferior) / 2
Else
inferior = coeficiente
coeficiente = (coeficiente + superior) / 2
End If
Range("R16").Value = coeficiente
Loop
End Sub
 

Leer las respuestas

#1 rgg27
14/02/2007 - 15:17 | Informe spam
No acabo de ver bien como enlazar un códogo con otro.
Perdona, pero mis conocimientos de VBA no son muy altos.
He probado de varias formas, pero el código SLEEP(1,0) parece que no
me lo admite así sin más.
Si podríais concretarme un poco más os lo agradecería.

Preguntas similares