Hi all,

I currently have the following code that copies a range of cells from Excel and pastes into a new blank word document.

I then need the contents of the word document to be copied, but all the methods that I've found via googling (Selection.Wholestory etc..) don't seem to work.

How can I make it select and then copy the contents of the word doc?

Sub recordfornotes()
'
' recordfornotes Macro






    Range("D242:G296").Select
    Selection.Copy
    ActiveWindow.ScrollRow = 226
    ActiveWindow.ScrollRow = 200
    ActiveWindow.ScrollRow = 148
    ActiveWindow.ScrollRow = 127
    ActiveWindow.ScrollRow = 105
    ActiveWindow.ScrollRow = 88
    ActiveWindow.ScrollRow = 76
    ActiveWindow.ScrollRow = 67
    ActiveWindow.ScrollRow = 66
    Range("E88").Select
    
    Dim appWord As Word.Application
     
    Set appWord = New Word.Application
    
     
    appWord.Visible = True
     
     
    appWord.Documents.Add.Content.Paste
    
   appWord.Activate
   
   
    
    
     

 
     
 
  
   
End Sub