Visual Basic - necesito exportar la imagen capturada a word

necesito salvar la imagen que se caprura en es te codigo pero direcctamente a word no a c:

'Api para generar un evento de tecla
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = 2
'Api para generar una pausa
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub copiar_Y_Guardar()
On Local Error Resume Next
'Variable para la imagen
Dim imagen As IPictureDisp
keybd_event 44, 0, 0, 0
'mediante Keyevent accionamos la tecla Alt+Printscreen
Set imagen = Clipboard.GetData
DoEvents
'Guardamos la imagen el directorio especificado
SavePicture imagen, "c:\pantalla.bmp"
'eliminamos la imagen de la memoria
Set imagen = Nothing
End Sub

Private Sub Command1_Click()
copiar_Y_Guardar
copiar_Y_Guardar
End Sub