Skyron,
The overwriting is probably due to what is currently selected in Word: you
previous paste.
Try using the collapse method:
Selection.Collapse Direction:=wdCollapseEnd
Selction.MoveEnd Unit:=wdCharacter, Count:=-1
Beyond that, you would need to take this question to the Word groups.
HTH,
Bernie
MS Excel MVP
"Skyron " wrote in message
...
Hey Guys,
I've been trying to use VBA in Excel to cut and paste to Word a set of
cells.
I'm trying to use a loop to cut and paste multiple times on different
pages.
The problem lies in that everytime I paste it overwrites the previous
paste I made. I've tried recording a macro in Word to see what
happens, and everything doesn't work the same way when using excel's
macro.
It appears that when I make a paste I've still got the previous paste
selected and it overwrites.
Here's a set of code I've been trying to get to work, I REALLY
appreciate if someone could help me out! I'm desperate and been
banging my head against the wall with this. HELP!! :p
With wrdDoc
'Write Data
Sheets("Sheet2").Select
For iWrd = 0 To Finali - 1
iFirstRow = iWrd * 28
iLastRow = (iWrd * 28) + 27
If iFirstRow = 0 Then
iFirstRow = 1
End If
Range("A" & iFirstRow & ":B" & iLastRow).Select
Selection.Copy
Content.InsertAfter "Header"
Content.PasteExcelTable False, False, False
Content.InsertBreak
Next iWrd
---
Message posted from http://www.ExcelForum.com/