I have this in a memo field. Not sure how I came upon it, but when you press F5, you get a bullet!
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
On Error GoTo Err_Form_KeyDown
Select Case KeyCode
Case vbKeyF5
ClipBoard_SetText Chr(149) & Chr(32)
DoCmd.RunCommand acCmdPaste
KeyCode = 0
End Select
Exit_Form_KeyDown:
Exit Sub
Err_Form_KeyDown:
MsgBox Err.Description, , " Work Method Statements"
Resume Exit_Form_KeyDown
End Sub