Здравствуйте.
Скажите пожалуйста, как заставить работать макрос одновременно в Word и Excel?
Записываю макрос в Word копирую в нем данные, переношу в Excel, в результате макрос запоминает только действия в Word.
Может надо что-то в коде макроса изменить?

Заранее благодарю за помощь.

Код макроса, записанного в Word
Sub Макрос2()
'
' Макрос2 Макрос
' Макрос записан 07.08.2009 Office
'
Selection.Find.ClearFormatting
With Selection.Find
.Text = "Адреса:"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Copy <- после этой строчки был переход в Excel, выделялась ячейка и в нее вставлялась скопированная информация
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Find.ClearFormatting
With Selection.Find
.Text = "Участок"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
Selection.Copy <- после этой строчки был переход в Excel, выделялась следующая ячейка и в нее вставлялась скопированная информация
End Sub

Все действия в Excel не записались...

Хорошо, после долгих поисков нашел как открыть документ Excel

CreateObject("wscript.shell").Run "C:\File2\381.xls"

но как выделить ячейку, вставить данные из буфера обмена и обратно перейти в Word не получается.
Помогите пожалуйста

Большое спасибо KL (XL) за ссылку, сейчас разбираюсь.