工具－》自定義；
在“工具欄”選項卡上單擊“新建”按鈕。
在“工具欄名稱”框中鍵入所需的名稱，然後單擊“確定”按鈕。
在“工具欄”選項卡上，單擊“屬性”按鈕。
在“類型”列表中，單擊“彈出式”。
設置所需的“允許自定義”屬性，然後單擊“關閉”按鈕。
這樣，Microsoft Access就將該快捷菜單添加到“快捷菜單”工具欄了。所有的自定義快捷菜單欄都可以在該工具欄看到。
然後在快捷菜單中加上快捷菜單項；
工具－》自定義；
在“工具欄”選項卡的“工具欄”框中，單擊“快捷菜單”。
在“快捷菜單”工具欄上，單擊“自定義”類別，再單擊新定義的菜單。
在“命令”選項卡的“類別”框中，單擊“文件”
把“命令”選項卡的“命令”框中的“自定義”拖到上面的快捷菜單中新定義的菜單後面的菜單項中，如本文末尾的圖。
這樣菜單中就會出現壹個新的名為“自定義”的菜單項；
然後為這個快捷菜單項指明所關聯的函數或宏
右鍵單擊這個新添的菜單項，設置它的各項屬性；
點擊屬性，設置它的“所在操作”
可以是宏的名稱也可以是函數的名稱，但不能是過程的名稱。
如果是函數的名稱，壹定要用=functionname()這種語法。而且貌似只能是funtion，不能是sub。
註意，如果是函數的話，這個函數必須是內置函數或者是位於控件所在類模塊的函數（可以是私有的）或者是位於標準模塊的公有函數。如果控件在子窗體中，則該函數只能位於標準模塊中或主窗體類模塊中而不能位於子窗體類模塊中，因為在父窗體中不能直接訪問到子窗體類模塊。
最後把這個快捷菜單欄指定給某窗體或某控件：這個簡單，只要在控件或窗體屬性的"快捷菜單欄"屬性裏填上這個快捷菜單欄的名稱就可以鳥。這個屬性的英文名叫shortcutmenubar
不過對於activex控件則無法簡單的通過設置shortCutMenuBar來指定它的快捷菜單欄,因為它們壓根沒有shortCutMenuBar這個屬性。這時可以通過在控件的mouseup事件中響應右鍵，並調用commandbars的ShowPop方法來實現快捷菜單的顯示