[Access] Modifica foglio di excel

[gibra]

Prima di tutto è meglio lasciare nascosto il foglio

oApp.Visible = False

Poi devi disattivare alcune proprietà di Excel che rallentano vistosamente nella modifica:

    oApp.Application.Interactive = False
    oApp.Application.ScreenUpdating = False
    oApp.Application.DisplayAlerts = False

Meglio disattivare anche il Calcolo automatico, se le celle contengono formule:

    oApp.Calculation = xlCalculationManual
    ' calcola comunque le formule prima di salvare
    oApp.CalculateBeforeSave = True

Alla fine, prima di salvare, rimetti tutto a posto:

    objExcel.Application.Interactive = True
    objExcel.Application.ScreenUpdating = True
    objExcel.Application.DisplayAlerts = True

    ' riabilito i calcoli
    objExcel.Calculation = xlCalculationAutomatic