[Resolvido]Criar Menu com Opção de Backup

Pessoal, boa tarde !

Criei um botão ("botaoteste") com o seguinte código VBA:

Private Sub botaoteste_Click()
Dim source As String
Dim destine As String
Dim fso As Variant

source = "n:\access"
destine = "n:\backup\access"

Set fso = CreateObject("Scripting.FileSystemObject")
yearstr = Year(Date)
monthstr = Month(Date)
daystr = Day(Date)
If monthstr < 10 Then
monthstr = "0" & monthstr
End If
If daystr < 10 Then
daystr = "0" & daystr
End If
destine = destine & yearstr & monthstr & daystr
fso.CopyFolder source, destine, True
Set fso = Nothing
MsgBox "O Banco de dados foi salvo"
End Sub

Está a funcionar perfeitamente. Quando clico no botão, faz-se uma cópia de segurança do Access, registrando ano, mês e dia do processamento.

Gostaria de descobrir agora como associar este mesmo evento à um item de menu, ao invés de um botão. Ao criar uma macro, não encontro uma ação que corresponda ao que desejo.

Há como associar este código a um item de menu? Digamos: Guia Suplementos, menu Manutenção, item Backup?

Obrigada !

Poderias utilizar uma macro "executar código" não?

Isso é o que também pensei. No entanto, ao abrir "Executar código", o que se abre, na verdade, é "construtor de expressões". Tenho coisas como igual, diferente, funções de agregação, mas aquilo que desejava, ou seja, um espaço para colar código VBA, isto não tenho. Será um erro macabro do Access?

Colocas o Código num módulo, depois utiliza a Macro Executar Código para chamar o módulo...