I wrote this code, it should run when the Enter key is pressed. However its not happening.
As I know I need to put this code on this "ThisDocument"
Private Sub Document_KeyPress(ByVal KeyAscii As Integer)
If KeyAscii = 13 Then
' This code will run when the Enter key is pressed
MsgBox "Enter key pressed"
End If
End Sub
I wrote this code and tried to run.