Sottomacro associate a tasti funzione

4 Risposte

• 

  muttley005

  Utente Attivo

  Iscritto da

  apr, 2015

  Messaggi:

  360

  Re: Sottomacro associate a tasti funzione

  20 ott 2022, 10:09

  Direttamente dalla macro nn so aiutarti, non le uso se non per richiamare appunto funzioni create in vba per tasti rapidi, per cui il mio suggerimento è proprio quello, usa una public function che viene richiamata dalla macro e all'interno verifica la form attiva con Screen.ActiveForm (.name)
• M

  Mailman

  Utente Attivo

  Iscritto da

  mag, 2022

  Messaggi:

  244

  Re: Sottomacro associate a tasti funzione

  20 ott 2022, 10:44

  Grazie muttley del consiglio, ho convertito la sottomacro in VBA, ho modificato il codice come segue e alla sottomacro faccio eseguire direttamente la Function:
  

  Public Function Autokeys_F9()
  On Error GoTo Autokeys_F9_Err
  
      If Screen.ActiveForm.Name = "FormOreLavorate" Then
   
          DoCmd.GoToControl "frmOLNUMtabOLco"
          DoCmd.RunCommand acCmdFilterBySelection
          DoCmd.GoToControl "frmOLIDtabOLid"
          DoCmd.RunCommand acCmdSortDescending
          DoCmd.GoToControl "frmOLDEStabOLno"
  
      Else
      End If
  Autokeys_F9_Exit:
      Exit Function
  
  Autokeys_F9_Err:
      MsgBox error$
      Resume Autokeys_F9_Exit
  
  End Function

  Grazie 1000
• 

  muttley005

  Utente Attivo

  Iscritto da

  apr, 2015

  Messaggi:

  360

  Re: Sottomacro associate a tasti funzione

  20 ott 2022, 10:46

  Nn serve ma per pulizia puoi togliere il ramo else
• M

  Mailman

  Utente Attivo

  Iscritto da

  mag, 2022

  Messaggi:

  244

  Re: Sottomacro associate a tasti funzione

  20 ott 2022, 10:54

  Si' gia' fatto, troppa fretta di postare... Grazie ancora