paste clipboard on ms word

• • Reply

  14 years ago

  by eukim82

  chong yew kim

  , Malaysia

  Joined 14 years ago

  i save my drawing on picturebox as clipboard and it's successfully be displayed on picture1.

  here is my sourcecode:

  Public Sub cmdDisp_Click()
  picDraw.AutoRedraw = True
  picDraw.Picture = picDraw.Image
  Clipboard.SetData picDraw.Picture, vbCFBitmap
  Picture1.Picture = Clipboard.GetData(2)
  Picture1.AutoSize = True
  
  
  
  
  
  
  

  However i need it to be displayed on ms word

  i  try this:

  Public Sub cmdDisp_Click()
  picDraw.AutoRedraw = True
  picDraw.Picture = picDraw.Image
  Clipboard.SetData picDraw.Picture, vbCFBitmap
  'Picture1.Picture = Clipboard.GetData(2)
  Call mword.Documents.Add
  Call mword.Selection.Paste
   Call mword.Documents(1).SaveAs("c:\sign.doc")
  'Picture1.AutoSize = True
  mword.Visible = True
  mword.Activate
  
  
  
  
  
  
  
  
  
  

  In stead of the picture on clipboard, "call mword.selection.paste" is displayed on ms word file. What should i do to obtain my picture?

  thx

   

   

   

   

   

   

   

   

   

   

   

   

   

   

   

   

   

   

  
   
  

   

  Report abuse