Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, _
  ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
 
Public Const VK_CONTROL = &H11
Public Const VK_1 = &H31
Public Const VK_2 = &H32
Public Const VK_3 = &H33
Public Const VK_F5 = &H74
Public Const KEYEVENTF_KEYUP = &H2
 
 
keybd_event VK_F5 , 1, 0, 0
keybd_event VK_F5 , 1, KEYEVENTF_KEYUP, 0

Gruss mm78pr

http://msdn.microsoft.com/de-de/default.aspx