Convertir DoCmd.DoMenuItem en RunCommand
15 novembre 2006 15:35
Access 97 | Compatible |
Access 2003 | Non testé |
(Access 97 Menu System)
DoCmd.DoMenuItem | RunCommand |
---|---|
acFormBar, acEditMenu, 2 | acCmdCopy |
acFormBar, acEditMenu, 5 | acCmdPasteAppend |
acFormBar, acEditMenu, 6 | acCmdDeleteRecord |
acFormBar, acEditMenu, 8 | acCmdSelectRecord |
acFormBar, acEditMenu, 10 | acCmdFind |
acFormBar, acEditMenu, 12, 4 | acCmdRecordsGoToNew |
acFormBar, acEditMenu, | acCopy acCmdCopy |
acFormBar, acEditMenu, | acPaste acCmdPaste |
acFormBar, acEditMenu, | acUndo acCmdUndo |
acFormBar, acFile, acSaveForm | acCmdSave |
acFormBar, acRecordsMenu, 0, 2 | acCmdAdvancedFilterSort |
acFormBar, acRecordsMenu, 2 | acCmdApplyFilterSort |
acFormBar, acRecordsMenu, 5 | acCmdRefresh |
acFormBar, acRecordsMenu, | acSaveRecord acCmdSaveRecord |
acFormBar, 7, 6 | acCmdSizeToFit |
1, 3, 3 | acCmdNewObjectReport |
3, acEditMenu, acPaste | acCmdPaste |
Exemple du bouton supprimer généré automatiquement :
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
devient :
RunCommand acCmdSelectRecord
RunCommand acCmdDeleteRecord
Voir en ligne : Trouvé sur le site de Terry Wickenden
Dans la même rubrique
18 février 2010 – Liste déroulante
26 janvier 2010 – Requête croisée
5 mars 2008 – Evènement sur Onglet
7 février 2008 – Astuces et pièges VBA
8 décembre 2007 – Envoi de mails