1 Тема от kortosh

  • kortosh
  • рядовой
  • Неактивен
  • Зарегистрирован: 08.01.2010
  • Сообщений: 3

Тема: Макрос для Связывание таблиц Word и Excel по ячейкам

Макрос, упрощающий Связывание таблиц Word и Exce.
Выбираются ячейки в Excel и Word (можно только часть таблицы). После запуска, макрос сам формирует связи.

Sub CopyFromExcel() 
'Связывание таблиц Word и Excel по ячейкам. Необходимо выделить ячейки в Excel и
' соответствующиие им ячейки в Word
    Dim objExcel, c, i
'Если ошибка - В пункте меню Tools -> References отметить 
' Microsoft Excel Object Library
    Set objExcel = GetObject(, "Excel.Application.11") 
    For Each c In Selection.Cells
        i = i + 1
        objExcel.Selection.Cells(i).Copy
        c.Select
        Selection.PasteExcelTable True, True, True
    Next c
End Sub

PS. Оставить комментарий в статье - не получилось. Если у кого нибудь получается коментировать - просьба продублировать сообщение в статье.

2 Ответ от admin

  • Макрос для Связывание таблиц Word и Excel по ячейкам
  • admin
  • Администратор
  • Неактивен
  • Откуда: Земля
  • Зарегистрирован: 15.12.2009
  • Сообщений: 508
  • Поблагодарили: 39

Re: Макрос для Связывание таблиц Word и Excel по ячейкам

А по какой причине вам не удалось оставить комментарий к той статье? Я конечно же размещу, но хотелось бы знать причину.

И второе - пожалуйста, используйте теги code при публикации кода.

Сайтadmin

3 Ответ от kortosh

  • kortosh
  • рядовой
  • Неактивен
  • Зарегистрирован: 08.01.2010
  • Сообщений: 3

Re: Макрос для Связывание таблиц Word и Excel по ячейкам

Несколько раз пытался оставить комментарий ...как гость - не получилось! Хоть и ввожу код с картинки правильно. ...как коментатор - таже история. Емэйл и пароль вводил теже, что и для форума. В обоих случаях - страница только обновляется. ...браузер InternetExplorer.
Еще у меня в Опере проблема - пропадает все содержимое страницы статьи ...через пару секунд после открытия страницы.
Про теги - прошу прощения. Забыл! )

4 Ответ от admin

  • Макрос для Связывание таблиц Word и Excel по ячейкам
  • admin
  • Администратор
  • Неактивен
  • Откуда: Земля
  • Зарегистрирован: 15.12.2009
  • Сообщений: 508
  • Поблагодарили: 39

Re: Макрос для Связывание таблиц Word и Excel по ячейкам

Форум и сайт не связаны.
Во-вторых, какая у вас версия Internet Explorer?
Opera - у меня последняя версия - ничего не пропадает...

Сайтadmin

5 Ответ от kortosh

  • kortosh
  • рядовой
  • Неактивен
  • Зарегистрирован: 08.01.2010
  • Сообщений: 3

Re: Макрос для Связывание таблиц Word и Excel по ячейкам

ie 7.0
Опера 9.22
А как регистрироваться на сайте?!? О_о

6 Ответ от admin

  • Макрос для Связывание таблиц Word и Excel по ячейкам
  • admin
  • Администратор
  • Неактивен
  • Откуда: Земля
  • Зарегистрирован: 15.12.2009
  • Сообщений: 508
  • Поблагодарили: 39

Re: Макрос для Связывание таблиц Word и Excel по ячейкам

Регистрация не обязательна, другие-то пользователи оставляют комментарии как гости в том числе.
Что касается регистрации, то в поле "Комментатор/хотите им стать" надо ввести ваш логин и пароль. На ваш ящик придет уведомление о подтверждении регистрации и там уже следуйте инструкциям.

Сайтadmin