PDA

Visualizza versione completa : Routine per migliorare le prestazioni di VBA


Alexsandra
20-05-2017, 17.49.15
Ci sono molti articoli sul miglioramento delle prestazioni di Excel, ne abbiamo parlato anche nel corso VBA (http://forum.wintricks.it/showpost.php?p=1703785&postcount=75), ma manca una semplice e breve routine che raccolga tutte le linee guida per il miglioramento delle performance VBA. Per cui ..... eccola

Option Explicit
Sub Opt(isOn As Boolean)
Application.Calculation = IIf(isOn, xlCalculationManual, xlCalculationAutomatic)
Application.EnableEvents = Not(isOn)
Application.ScreenUpdating = Not(isOn)
ActiveSheet.DisplayPageBreaks = Not(isOn)
End Sub

Come si usa

Inserite la routine Opt in un Modulo standard e quando volete applicare l'ottimizzazione nella macro che create inserite il riferimento alla Sub Opt con il flag True in entrata e False in uscita

Sub test()
Opt True
'....... altro codice
MsgBox "Test eseguito"
Opt False
End Sub