Come attivare o disattivare le opzioni di avvio in un progetto di database di Access

In questo articolo si applica solo a un progetto di Microsoft Access (adp).

Moderato: Richiede competenze di interoperabilità, la codifica e macro di base.

Riepilogo

In questo articolo viene descritto come disattivare la funzionalità del tasto MAIUSC consente di ignorare le opzioni di avvio. In questo articolo viene inoltre descritto come applicare le opzioni di avvio in un progetto di database di Microsoft Access.

Ulteriori informazioni

Le opzioni di avvio definiti per un file di Access determinano l'aspetto di file e il file si comporta come quando si apre il file. È possibile impostare le opzioni di avvio utilizzando l'interfaccia utente di avvio o utilizzando la macro AutoExec .

Per ignorare le opzioni di avvio impostati per il progetto di database di Access, tenere premuto il tasto MAIUSC mentre si apre il progetto di database di Access.

In alternativa, per applicare le opzioni di avvio impostati per il progetto di database di Access, è possibile disattivare la funzionalità del tasto MAIUSC consente di ignorare le opzioni di avvio. A tale scopo, impostare la proprietà AllowBypassKey su False.

Per impostare la proprietà AllowBypassKey su False, attenersi alla seguente procedura.

Passaggi per un progetto di Access (.adp)

  1. Avviare Access.

  2. Aprire un progetto di database di Access.

  3. Premere ALT + F11 per aprire l'editor di Visual Basic.

  4. Nell'editor di Visual Basic, fare clic su
    Finestra controllo immediato dal menu Visualizza .

  5. Digitare il codice seguente o incollare il codice seguente nella finestra immediata e quindi premere INVIO.

    CurrentProject.Properties.Add "AllowBypassKey", False
  6. Chiudere l'Editor di Visual Basic e quindi chiudere il progetto di database di Access.

  7. Aprire il progetto di database di Access. Provare a ignorare le opzioni di avvio impostati per il progetto di database di Access tenendo premuto il tasto MAIUSC mentre si apre il progetto di database di Access.

    La funzionalità del tasto MAIUSC consente di ignorare l'opzione di avvio è disattivata. Anche se si tiene premuto il tasto MAIUSC per ignorare le opzioni di avvio, le opzioni di avvio vengono eseguite. Non è possibile ignorare le opzioni di avvio.

Passaggi per un database di Access (file con estensione mdb o accdb)

  1. Avviare Access.

  2. Creare un nuovo modulo e quindi aggiungere le due funzioni seguenti:

    Function ap_DisableShift()
    'This function disable the shift at startup. This action causes
    'the Autoexec macro and Startup properties to always be executed.

    On Error GoTo errDisableShift

    Dim db As DAO.Database
    Dim prop as DAO.Property
    Const conPropNotFound = 3270

    Set db = CurrentDb()

    'This next line disables the shift key on startup.
    db.Properties("AllowByPassKey") = False

    'The function is successful.
    Exit Function

    errDisableShift:
    'The first part of this error routine creates the "AllowByPassKey
    'property if it does not exist.
    If Err = conPropNotFound Then
    Set prop = db.CreateProperty("AllowByPassKey", _
    dbBoolean, False)
    db.Properties.Append prop
    Resume Next
    Else
    MsgBox "Function 'ap_DisableShift' did not complete successfully."
    Exit Function
    End If

    End Function

    Function ap_EnableShift()
    'This function enables the SHIFT key at startup. This action causes
    'the Autoexec macro and the Startup properties to be bypassed
    'if the user holds down the SHIFT key when the user opens the database.

    On Error GoTo errEnableShift

    Dim db as DAO.Database
    Dim prop as DAO.Property
    Const conPropNotFound = 3270

    Set db = CurrentDb()

    'This next line of code disables the SHIFT key on startup.
    db.Properties("AllowByPassKey") = True

    'function successful
    Exit Function

    errEnableShift:
    'The first part of this error routine creates the "AllowByPassKey
    'property if it does not exist.
    If Err = conPropNotFound Then
    Set prop = db.CreateProperty("AllowByPassKey", _
    dbBoolean, True)
    db.Properties.Append prop
    Resume Next
    Else
    MsgBox "Function 'ap_DisableShift' did not complete successfully."
    Exit Function
    End If

    End Function
  3. Nell'editor di Visual Basic, scegliere Finestra immediata dal menu Visualizza .

  4. Se si desidera disattivare il tasto MAIUSC, digitare ap_DisableShift nella finestra immediata e quindi premere INVIO. Se si desidera abilitare il tasto MAIUSC, digitare ap_EnableShift nella finestra immediata e quindi premere INVIO.

Serve aiuto?

Amplia le tue competenze
Esplora i corsi di formazione
Ottieni in anticipo le nuove caratteristiche
Partecipa a Microsoft Insider

Queste informazioni sono risultate utili?

Grazie per il feedback!

Grazie per il tuo feedback! Potrebbe essere utile metterti in contatto con uno dei nostri operatori del supporto di Office.

×