Hola, lo que tienes que utilizar es el objeto clipboar, que sirve para lo que tu quieres, yo siempre aconsejo utilizar la ayudar de Visual, asi que:
ingresa Clipboard y Buscar, pero igual te envio al para que lo mires:
Private Sub mnucopiar_Click()
Clipboard.Clear
Clipboard.SetText Screen.ActiveControl.SelText
end sub
Private Sub mnuCortar_Click()
Clipboard.Clear
Clipboard.SetText Screen.ActiveControl.SelText
Screen.ActiveControl.SelText = ""
'cortamos
End Sub
Private Sub mnuPegar_Click()
Screen.ActiveControl.SelText = Clipboard.GetText
End Sub