Realizando “benchmark” en el rendimiento del código en vba

[digitalboy]

Algunos programadores siempre están buscando la manera más óptima de crear código VBA el cual haga uso de los recursos de manera más eficiente (como la memoria, almacenamiento en disco duro) y a su vez se ejecute en el menor tiempo posible (uso de CPU).

Lo más habitual es estimar cuanto tiempo le tomara a nuestro script ejecutarse y para ello hacemos una comparativa en el proceso de ejecución del programa, para ello muchos se valen de las dos siguientes técnicas:

• Uso de la función NOW
  

• Uso de la función Timer
  

En la primera ya muchos conocen la función Now la cual devuelve la fecha y hora actuales, la cual se podría usar de la siguiente forma:

El resto del articulo: http://mexcel.wordpress.com/2014/10/26/realizando-benchmark-en-el-rendimiento-del-codigo-en-vba/

[digitalboy]

Comparto con ustedes la clase desarrolla para medir el tiempo que toma una macro, loop, rutina o función en ejecutarse. Dicha clase tiene como nombre: “clsTimer”. La cual nos permite obtener el tiempo consumido en minutos, segundos y milisegundos

Un ejemplo de cómo usar dicha clase seria:

Sub test()

Dim oTimer As clsTimer

Dim i As Long

Dim contador As Long

Set oTimer = New clsTimer

oTimer.StartTimer

For i = 1 To 400000000

contador = contador + 1

Next

MsgBox oTimer.GetElapsedTime(Seconds) & " segundos!", vbInformation

End Sub

[/CODE]

Pueden descargarse la macro que contiene la clase y codigo de la misma del siguiente articulo: Realizando “benchmark” en el rendimiento del código en VBA – Pte 2

Saludos!