Hi

I have a open document with a macro to copy a particular section,
what I would like to then do is for the macro to open another named
document and paste that selection in it, then to “shift” “control”
“F9” that pasted section.

Sub Macro2()
'
' Macro2 Macro
' Macro recorded 04/09/2010 by john
'
Selection.MoveDown Unit:=wdLine, Count:=123
Selection.MoveLeft Unit:=wdCharacter, Count:=6
Selection.MoveDown Unit:=wdLine, Count:=75, Extend:=wdExtend
Selection.Copy
End Sub


Any ideas

Thanks

One thought: instead of pasting and then unlinking, why not just paste as
unformatted text to begin with?

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
http://word.mvps.org

"Johnnyboy5" <(E-Mail Removed)> wrote in message
news:e491e4b4-4f06-443e-a52a-(E-Mail Removed)...
Hi

I have a open document with a macro to copy a particular section,
what I would like to then do is for the macro to open another named
document and paste that selection in it, then to “shift” “control”
“F9” that pasted section.

Sub Macro2()
'
' Macro2 Macro
' Macro recorded 04/09/2010 by john
'
Selection.MoveDown Unit:=wdLine, Count:=123
Selection.MoveLeft Unit:=wdCharacter, Count:=6
Selection.MoveDown Unit:=wdLine, Count:=75, Extend:=wdExtend
Selection.Copy
End Sub


Any ideas

Thanks

On 4 Sep, 19:04, "Suzanne S. Barnhill" <sbarnh...@mvps.org> wrote:
> One thought: instead of pasting and then unlinking, why not just paste as
> unformatted text to begin with?
>
> --
> Suzanne S. Barnhill
> Microsoft MVP (Word)
> Words into Type
> Fairhope, Alabama USAhttp://word.mvps.org
>
> "Johnnyboy5" <intermediatec...@gmail.com> wrote in message
>
> news:e491e4b4-4f06-443e-a52a-(E-Mail Removed)...
> Hi
>
> I have a open document with a macro to copy a particular section,
> what I would like to then do is for the macro to open another named
> document and paste that selection in it, *then to “shift” “control”
> “F9” *that pasted section.
>
> Sub Macro2()
> '
> ' Macro2 Macro
> ' Macro recorded 04/09/2010 by john
> '
> * * Selection.MoveDown Unit:=wdLine, Count:=123
> * * Selection.MoveLeft Unit:=wdCharacter, Count:=6
> * * Selection.MoveDown Unit:=wdLine, Count:=75, Extend:=wdExtend
> * * Selection.Copy
> End Sub
>
> Any ideas
>
> Thanks

Hi

coz the text is linked to a form with lots of fields and other "ref"
links to a table etc... its a bit messy but I something I use everyday
for my job,

I have sorted it out now...

thanks for your thoughts though.

Johnny