Actually, as I'm sure you know, you can't. Not like that anyway. What you need to do is create a generic sub that handles both (calls from Form_KeyPress and your other sub). For example:

Private Sub Form_KeyPress(KeyAscii As Integer)
GenericSub(KeyAscii)
End Sub

Sub AnotherSub()
GenericSub(KeyThatYouWantFired)
End Sub

Sub GenericSub(KeyThatYouWantFired as Integer)
'do whatever you are trying to do here
'such as setting properties or calling
'other subs
End Sub

-Adam