View Single Post
  #1   Report Post  
morrowkd
 
Posts: n/a
Default exporting excel worksheet to word


Hi JulieD,

Can you give me some tips or code to write an excel macro that will
actually perform that paste special-paste link command. Here is a
macro I wrote that simply copy's the specified cells and paste's them
in a word document, but I am unfamiliar with VBA and I cannot figure
out the commands to do a paste special--paste link rather then a
general paste.

Sub Macro4()
Set myWord = CreateObject("Word.Basic")
myWord.FileNew
myWord.ViewZoomWholePage
Worksheets("sheet1").Range("PCTR").CopyPicture Appearance:=xlScreen,
Format:=xlPicture
myWord.EditPastespecial DataType:="PICT"
Application.CutCopyMode = False
myWord.InsertPara
myWord.FileSaveAs Name:="PCTR.DOC"
myWord.FileClose
myWord.FileExit
Set myWord = Nothing
' Macro4 Macro
' Macro recorded 5/12/2005 by s390264
End Sub

thanks
danielle

JulieD Wrote:



--
morrowkd
[/i][/color]


--
morrowkd