Pulsante Calcolo magazzino Fiscale Inizio (CODICE)

On Error GoTo Err_cmd_CalcoloMagazzinoFiscale_Click

    Dim stDocName As String

    stDocName = "qry_CREATE_Rimanenze_Magazzino"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_cmd_CalcoloMagazzinoFiscale_Click:
    Exit Sub

Err_cmd_CalcoloMagazzinoFiscale_Click:
    MsgBox Err.Description
    Resume Exit_cmd_CalcoloMagazzinoFiscale_Click


prof in gamba