Excel макросы ссылки с файла на файл

Как создать в Excel ссылку на ячейку в другом файле

​Смотрите также​ так понимаю?​ нажать «сохранить» и​ заявки на подбор.xlt»​- ссылка только​ умеет создавать заполненную​ наведите указатель на​ автоматических связей с​Чтобы отобразить значок, установите​.​ вправо на листе​Когда закончите свою работу​ таблицу вместо Показать​ объект.​ «Лист1» — текущий​ аргумент «адрес».​ ячеек: =[Источник.xls]Лист1!А1:В5​

​В приложении Microsoft Office​RAN​ сохранить его в​ ‘Ïóòü ê ôàéëó​ на данные (без​ форму письма email,​ элемент​

Типы ссылок

​ объектами OLE, сделайте​ флажок​Внедрение содержимого из другой​ или добавить значок,​

1. ​ в окне без​ содержимое файла, установите​Когда следует использовать связанные​ лист.​Аргумент «имя» может​Такой вид будут они​ Excel возможно использовать​: Вот я я​ виде того же​ øàáëîíà çàÿâêè íà​ строки заголовка и​ что сильно помогает​Объект​ следующее:​
2. ​отобразить в виде значка​ программы​ который открывает файл.​ сохранения внедренный объект​ флажок​ объекты​=ГИПЕРССЫЛКА(«[Книга1.xlsx]Январь!A10»;»Перейти на лист Январь​ быть представлен значением,​ иметь, если файл,​ данные не только​ тоже.​ шаблона без единицы​ ïîäáîð​ итогов)​ при рассылке типовых​ ​Нажмите​
3. ​. При необходимости можно​Щелкните лист, на который​Щелкните ячейку листа, в​

​ может выполнять другие​отобразить в виде значка​Используйте связанные объекты, если​ > A10″)​ текстовой строкой, именем​ данные которого используются​ открытой рабочей таблицы,​вариант из #18​ n t вернуть​su60​Таблица1[#Заголовки]​ оповещений.​тип объекта​Кнопку Microsoft Office​

Процесс создания ссылки на ячейку в другом файле

​ изменить по умолчанию​

1. ​ необходимо поместить внедренный​ которую вы хотите​ задачи. При закрытии​. Если вы​ нужно, чтобы данные​Чтобы перейти в место​
2. ​ или ячейкой, содержащей​ для ссылки, будет​ но и задействовать​ будет работать из​ ему начальное имя,​
3. ​: Я сделал так:​- ссылка только​Синтаксис функции прост:​(например,​, выберите пункт​ значок или подпись.​ объект.​ вставить объект.​
4. ​ книги будут автоматически​ не выбрали все​ в конечном файле​ на другом листе,​ текст или значение​ открыт во время​
5. ​ данные других файлов​ любого места.​ то всё работает​ fName = Replace(ThisWorkbook.FullName,​
6. ​ на первую строку​=ГИПЕРССЫЛКА(Адрес; Текст)​Объект Документ​Параметры Excel​ Чтобы сделать это,​На вкладке​На вкладке​ сохранены на новых​
7. ​ флажки Excel отображает​ обновлялась при изменении​ укажите имя книги​ для перехода.​ работы.​

Внешний вид Excel ссылки на ячейку в другом файле

​ Excel. Кроме того,​

1. ​Если так люб​ замечательно. И ваш​
2. ​ ThisWorkbook.Name, «Шаблон заявки​ таблицы с заголовками​

​Текст​) и выберите команду​и выберите категорию​ щелкните​Вставка​Вставка​

​ объектов.​ первую страницу файла.​ данных в исходном​ и имя листа,​Если аргумент «имя»​Для того чтобы использовать​

​ если имеется несколько​

Обновление данных в файле

​ шаблон, привязывайтесь а​ вариант Kuzmich тоже​ на подбор.xlt») В​ столбцов​- это видимый​Преобразовать​Дополнительно​Значок изменения​в группе​в группе​Примечание:​ В обоих случаях​

​ файле.​ как в этом​ возвращает значение ошибки​ данные файла, который​ файлов Excel с​ адресу книги «Список​ работет прекрасно. Маккрос​ двух файлах с​Таблица1[#Итоги]​ текст гиперссылки в​.​.​и щелкните значок,​Текст​Текст​ После добавления объекта вы​

​ полный файл откроется​При использовании связанного объекта​ примере, где «Январь»​ (например, #ЗНАЧ!), вместо​ в данный момент​ разными сведениями, для​ кандидатов.xlsm»​ почему-то не может​

​ абсолютно одинаковым текстом​

fb.ru

ГИПЕРССЫЛКА (функция ГИПЕРССЫЛКА)

​- ссылка на​ ячейке (обычно выделенный​Выполните одно из следующих​​В разделе​​ который вы хотите​

Описание

​нажмите кнопку​​нажмите кнопку​​ можете перетащить его​ между столбцами. Нажмите​ исходные данные хранятся​ — другой лист​ текста ссылки в​ закрыт, в ссылке​ удобства систематизации и​On Error Resume​ прописать полный путь​ макросов. В одном​​ строку итогов (если​​ синим цветом и​ действий.​При пересчете этой книги​

Синтаксис

​ из списка​​Объект​

​Объект​ в любое место​

• ​ кнопку​​ в исходном файле.​ в книге.​ ячейке отображается значение​ необходимо указывать полный​ анализа информации можно​ Next fName =​ к другому файлу​ (Список кандидатов) он​ она включена)​ подчеркиванием, как все​Чтобы преобразовать внедренный объект​убедитесь, что установлен​значок​.​.​ на листе Excel​ОК​ В конечном файле​=ГИПЕРССЫЛКА(ЯЧЕЙКА(«адрес»,Январь!A1″;»Перейти на лист Январь​ ошибки.​
  ​ путь к файлу:​​ создать отдельный документ,​ Workbooks(«Список кандидатов.xlsm»).Path &​ в этой же​ работает в другом​Это относительно экзотический вариант​ гиперссылки), по которому​ в тип, выбранный​ флажок​или в поле​
  ​Если документ еще не​На вкладке​ или изменить его​.​ отображается представление связанных​ > A1″)​

• ​Чтобы в классическом приложении​​=D:Папка[Источник.xls]Лист1!A1​ который будет обобщать​ «Шаблон анкеты1.xltm»​ папке, если файл​ не находит файла»Шаблон​ применения функции гиперссылка,​ щелкает пользователь. Может​ в списке, установите​Обновить ссылки на другие​заголовок​
  ​ существует, откройте вкладку​Новый​ размер с помощью​Примечание:​ данных, однако хранится​Чтобы перейти в другое​
  ​ Excel выделить ячейку​Если оба используемых документа​ и производить необходимые​Kuzmich​ в котором он​ заявки на подбор»​

Замечания

​ позволяющий создавать заполненный​ быть любым, это​ флажок​ документы​введите метку.​Новый​выберите в списке​ маркеров изменения размера.​ После добавления значок или​​ в нем только​ место на текущем​ с гиперссылкой без​ открыты, а в​ расчеты с информацией​: А, если сразу​ сидит меняет своё​ . Все три​ бланк электронного письма:​ роли не играет.​

Примеры

support.office.com

Вставка объекта в электронной таблице Excel

​ она работае, а​​ т.д. Очень удобно​Это самый простой и​.​Примечание:​ их обновлением из​введите имя файла​.​в группе​ или значок один​ должен быть доступен​Чтобы быстро обновить все​ В Excel Online​ текущем файле, содержащем​От типа ссылки зависит,​su60​Kuzmich​ в первом нет.​ для служебных уведомлений​ очевидный вариант применения​Нажмите клавиши CTRL+G для​ Отсутствие команды​

​ исходного файла, или​ или нажмите кнопку​Нажмите кнопку​Текст​ раз.​ на локальном диске​

​ формулы на листе,​ выделите ячейку, щелкнув​ ссылку.​ на какие значения​: RAN, посмотрите пож​: Переименуйте шаблон в​ Как это может​ и рассылок. Единственное,​ нашей функции​ отображения диалогового окна​Изменить связи​ с помощью запроса​​Обзор​​ОК​​нажмите кнопку​​Можно просто добавить ссылку​​ или в сети.​​ использующие функцию ГИПЕРССЫЛКА​​ ее, когда указатель​​Если данные ячеек исходного​ будет указывать ссылка​ в приложении. Я​ .xls и открывайте​

Общие сведения о связанные и внедренные объекты

​ быть? Где я​ что нельзя таким​ГИПЕРССЫЛКА (HYPERLINK)​Переход​означает, что файл​ обновления, независимо от​для выбора файла​. В зависимости от​Объект​ на объект, а​Связанные данные могут обновляться​ с теми же​ имеет вид стрелки.​ файла изменяются, когда​ при ее перемещении:​ что-то не так​ его в режиме​ чего не вижу?​ образом сделать -​. Первым аргументом здесь​.​

​ не содержит связанных​ включенного способа обновления​

​ из списка.​ типа вставляемого файла​.​

​ не ее внедрения​ автоматически при изменении​

​ аргументами, можно поместить​ Чтобы перейти по​ документ со ссылкой​

​Относительная ссылка показывает значение​ сделал. Не работает.​

​ только чтение (чтобы​ Помогите!​ прикрепить вложения. Подробнее​ будет полная ссылка​Нажмите кнопку​ данных.​

​ (автоматически или вручную).​Снимите флажок​ откроется новое окно​Откройте вкладку​ полностью. Можно сделать,​ данных в исходном​ целевой объект ссылки​ гиперссылке, щелкните ячейку,​ закрыт, то при​ ячейки, удаленной от​ (out of range)​ не испортить).​При вашем варианте​ про все возможности​ на веб-страницу (URL):​Выделить​Из списка​На вкладке​

​Связь с файлом​ программы или появится​Из файла​ если книгу и​ файле. Например, если​ на тот же​ когда указатель имеет​ следующем открытии этого​ самой себя на​su60​Я вот только​ результат тот же​ и параметры такого​Обратите внимание, что адрес​

​, выберите вариант​Источник​

​Данные​.​ окно редактирования.​.​ объект, который вы​ в документе Word​ или другой лист,​ вид руки.​ файла программа выдаст​ одинаковое расстояние. При​: Kuzmich, лучше в​ не нашел в​ — не видит​

​ способа рассказано в​ должен быть полным,​объекты​выберите связанный объект,​в группе​Выполните одно из следующих​Создайте объект, который вы​Нажмите кнопку​ хотите добавить хранятся​ выделяется абзац, который​ а затем использовать​Пример​ сообщение с предложением​ перемещении такой ссылки​ тексте кода пометьте,​ шаблоне именованных диапазонов,​ файла.​ отдельной статье.​ т.е. обязательно начинаться​

​и нажмите кнопку​ который необходимо изменить.​

​Подключения​ действий.​ хотите вставить.​Обзор​ на сайте SharePoint,​ затем вставляется в​ абсолютную ссылку на​Результат​ обновить связи. Следует​ на один столбец​ я пока не​ из которых вы​Файлы удалены: превышение​Иногда можно сочетать функцию​ с протокола (обычно​ОК​Совет:​нажмите кнопку​Чтобы отобразить содержимое объекта,​Если Excel открыл новое​

​и выберите файл,​ общем сетевом диске​ качестве связанного объекта​ эту ячейку в​

Внедрение объекта на лист

1. ​=ГИПЕРССЫЛКА(«http://example.microsoft.com/report/budget report.xlsx», «Щелкните, чтобы​ согласиться и выбрать​ вправо, ее значение​

2. ​ очень. Спасибо.​​ берете данные​​ допустимого размера вложения​​ ГИПЕРССЫЛКА с функцией​​ «http»). При щелчке​​.​ ​ Для выделения нескольких связанных​
   

3. ​Изменить связи​​ снимите флажок​​ окно программы для​​ который вы хотите​​ или же расположении​

4. ​ в книгу Excel,​​ качестве аргумента «адрес»​​ просмотреть отчет»)​ пункт «Обновить». Таким​ будет соответствовать значению​

5. ​su60​в массив​ [МОДЕРАТОР]​ вывода нестандартных знаков​ по созданной ссылке​​Несколько раз нажмите клавишу​​ объектов щелкните каждый​.​В виде значка​ создания объекта, вы​ вставить.​ и расположение файлов​ то при изменении​ в формулах с​​Открывает книгу, сохраненную по​​ образом, при открытии​

   ​ ячейки, расположенной на​​: Куда-то файл с​su60​su60​ СИМВОЛ (CHAR), которую​ заданный сайт откроется​ TAB, пока не​ из них, удерживая​Примечание:​.​ можете работать непосредственно​Если вы хотите вставить​

Вставка ссылки на файл

​ не изменится. Это​ данных в документе​ функцией ГИПЕРССЫЛКА. Изменения​ адресу http://example.microsoft.com/report. В​ документа ссылка использует​ один столбец правее​ кодом пропал. Ещё​: Мне кажется у​: Видимо никто не​ мы уже разбирали.​ в браузере по​ будет выделен требуемый​ нажатой клавишу CTRL.​ Отсутствие команды​Чтобы отобразить значок, установите​ в нем.​ значка в электронную​

​ удобно, если связанный​​ Word данные в​ целевого объекта ссылки​ ячейке отображается текст​

1. ​ обновленные данные исходного​ изначальной. Приложение Microsoft​ разок.​

2. ​ меня есть мысль​​ сталкивался с такой​​ Это позволяет заменить​​ умолчанию.​​ объект.​​ Чтобы выделить все​ ​Изменить связи​
   

3. ​ флажок​​Когда закончите свою работу​​ таблицу вместо Показать​

4. ​ объект изменяется, так​​ книге Excel также​​ при этом будут​ «Щелкните, чтобы просмотреть​ файла, а пересчет​

5. ​ Office Excel обычно​​Kuzmich​​ получше, только подскажите​ проблемой.​​ простой текст ссылки​​Если нужна ссылка на​

Создание объекта в Excel

​Нажмите клавиши SHIFT+F10.​ связанные объекты, нажмите​означает, что файл​отобразить в виде значка​ в окне без​ содержимое файла, установите​ как ссылка всегда​ будут изменены.​ немедленно отражаться в​ отчет» в качестве​ формул с ее​ по умолчанию использует​: Попробуйте так, в​ пож как её​Игорь​ на что-то более​

1. ​ ячейку или диапазон,​Наведите указатель на элемент​ клавиши CTRL+A.​

2. ​ не содержит связей​​. Чтобы изменить изображение​​ сохранения внедренный объект​​ флажок​​ открывается последнюю версию​​Когда следует использовать внедренные​ ​ формулах.​
   

3. ​ текста ссылки.​​ использованием произойдет автоматически.​​ этот вид ссылок.​ коде файл открывать​ реализовать.​: после строки кода​ симпатичное:​ находящийся внутри текущей​Объект​Нажмите​​ с другими файлами.​​ по умолчанию значка​

4. ​ может выполнять другие​​отобразить в виде значка​​ документа.​ объекты​Примечание:​=ГИПЕРССЫЛКА(«[http://example.microsoft.com/report/budget report.xlsx]Годовой!F10»; D1)​Кроме создания ссылок на​

5. ​Абсолютная ссылка показывает значение​ не надо, закомментируйте​

   ​Сразу после открытия​fName = …​su60​ книги, то адрес​или​

   

   ​Обновить значения​В списке​ или метки, нажмите​ задачи. При закрытии​. Если вы​Примечание:​Используйте внедренный объект, если​Мы стараемся как​

   ​Создает гиперссылку на ячейку​​ ячейки в другом​ одной и той​ эти строки​ шаблона создаётся новый​ ‘ тут что-то​: Как заменить абсолютную​ нужно будет указать​Объект Диаграмма​.​Источник​

Внедрение объекта на лист

1. ​Значок «Изменить»​ книги будут автоматически​ не выбрали все​

2. ​ Если связанный файл переместить,​​ не требуется, чтобы​​ можно оперативнее обеспечивать​​ F10 листа​​ файле, в Excel​​ же ячейки исходных​​Dim WB_template As​

   

3. ​ файли конечно же​​ с относительными ссылками​​ ссылку типа fName​

   

4. ​ следующим образом:​​и выберите команду​​В приложении Excel можно​выберите связанный объект,​и щелкните значок,​

5. ​ сохранены на новых​ флажки Excel отображает​ ссылка не будет​ скопированные данные изменялись​ вас актуальными справочными​​Годовой​​ реализовано еще множество​ данных. Создается она​ Workbook Set WB_template​ он пока не​добавьте строку​ = «C:UsersAnatoliyDesktopБаза HRШаблон​Здесь знак решетки (#)​Изменить​​ изменить содержимое, связанное​​ который необходимо обновить.​

   ​ который вы хотите​​ объектов.​ первую страницу файла.​ работать.​ при их изменении​ материалами на вашем​книги, сохраненной по​ различных возможностей, позволяющих​ путем некоторой корректировки​ = Workbooks(«Шаблон заявки​ в этой папке,​msgbox fName​

Вставка ссылки на файл

​ для заявки на​ обозначает текущую книгу.​.​ или внедренное из​ Буква​ из списка​Примечание:​ В обоих случаях​Щелкните ячейку листа, в​ в исходном файле.​ языке. Эта страница​ адресу http://example.microsoft.com/report. В​ сделать процесс работы​ готовой формулы. Для​ на подбор1″) sAdress​ а где-то в​и будет выскакивать​

​ подбор.xlt» на относительную.​​ Вместо адреса одной​Это сообщение появляется, если​ другой программы.​

1. ​A​значок​ После добавления объекта вы​

2. ​ полный файл откроется​​ которую вы хотите​​ Версия исходных данных​​ переведена автоматически, поэтому​​ ячейке листа, содержащей​​ намного удобнее и​​ этого в ссылке​

   

3. ​ = «Должность[Должность]» ‘указываем​​ регистре Excel, поэтому​​ окно с полным​

4. ​ Все файлы находятся​​ ячейки можно, само-собой,​​ невозможно открыть исходный​Редактирование связанного объекта в​в столбце​

5. ​или введите подпись​​ можете перетащить его​​ между столбцами. Нажмите​ вставить объект.​​ полностью внедряется в​​ ее текст может​

   

Создание объекта в Excel

​ гиперссылку, в качестве​ быстрее.​ перед номером столбца​ диапазон vData =​ он и не​ путем к файлу​ в папке «База​ указать целый диапазон.​ файл или программу-источник.​ исходной программе​Обновить​ в поле​ в любое место​ кнопку​На вкладке​ книгу. При копировании​

1. ​ содержать неточности и​ текста ссылки отображается​Автор: Недир Байрамов​

2. ​ и строки устанавливается​​ WB_template.Sheets(«Списки»).Range(sAdress).Value ‘получаем значение​​ может прописать путь​​потом проверяете, есть​​ HR». Нужно чтобы​​Если имя листа содержит​​Убедитесь, что исходная программа​

   

3. ​На вкладке​​означает автоматическое обновление​​заголовок​ на листе Excel​ОК​Вставка​ данных в качестве​ грамматические ошибки. Для​ содержимое ячейки D1.​В этой статье описаны​​ символ $. Если​​ указанного диапазона​

   

4. ​ от какой-то там​​ ли такие папки​​ база работала независимо​ пробелы, то его​ доступна.​Данные​ связи, а буква​

5. ​.​ или изменить его​

   ​.​в группе​ внедренного объекта конечный​ нас важно, чтобы​=ГИПЕРССЫЛКА(«[http://example.microsoft.com/report/budget report.xlsx]’Первый квартал’!ИтогиОтдел», «Щелкните,​

   

   ​ синтаксис формулы и​ символ доллара устанавливается​su60​ папки. Его надо​ / подпапки /​ от места её​ обязательно заключать в​    Если исходная программа не​

   ​в группе​​M​Связывание или внедрение Частичное​ размер с помощью​Примечание:​текст​ файл занимает больше​ эта статья была​ чтобы просмотреть итоги​ использование функции​ только перед номером​

Связывание или внедрение содержимого из другой программы с помощью OLE

​: Выбрасывает окно Run-Time​ сразу после открытия​ файлы на компе​ расположения.: с флешки,​

​ апострофы — иначе​ установлена на компьютере,​

1. ​Подключения​в столбце​ содержимое из другой​

2. ​ маркеров изменения размера.​​ После добавления значок или​​нажмите кнопку​​ дискового пространства, чем​​ вам полезна. Просим​​ по отделу за​​ГИПЕРССЫЛКА​

   

3. ​ столбца/строки, то с​​ Error 9 (out​​ сохранить, (он окажется​

4. ​и сразу поймете​​ с другого диска,​​ ссылка не сработает:​ преобразуйте объект в​​нажмите кнопку​​Обновить​ программы​

5. ​ Чтобы отобразить эти​​ файл можно перетащить​​объект​

6. ​ при связывании данных.​ вас уделить пару​

   • ​ первый квартал»)​в Microsoft Excel.​​ перемещением ссылки ее​​ of range) и​

   • ​ в нужной папке​ причину проблемы​​ из дропбокса, на​​Можно легко создать ссылку​ формат файла той​Изменить связи​ — обновление​​В используемой программе (не​​ маркеры, щелкните объект​ и вставьте его​.​При открытии файла на​​ секунд и сообщить,​​Создает гиперссылку на диапазон​​Функция​​ значения будут меняться​

   ​ помечает жёлтым строку.​​ и сможет прописать​​su60​​ другом компе. В​ на ячейку во​ программы, которая есть​.​Вручную​ в Excel) выделите​​ один раз.​​ на листе. Также​​Откройте вкладку​​ другом компьютере можно​​ помогла ли она​​ИтогиОтдел​

​ГИПЕРССЫЛКА​ в пределах указанного​

1. ​ Прикрепленные файлы Ji.PNG​ полный путь) и​: Игорь, если пошагово​

2. ​ загруженном файле такая​​ внешней книге. Тогда​​ на компьютере.​​Примечание:​​.​​ данные, которые требуется​​Можно связать или внедрить​

   

3. ​ можно изменить значок​Создание из файла​​ просмотреть внедренный объект,​​ вам, с помощью​​на листе​​создает ярлык, который​

   ​ столбца/строки исходных данных.​ (52.1 КБ)​​ потом выполнять все​​ проверять макрос,то и​​ ссылка используется в​​ в качестве первого​Убедитесь, что имеется достаточно​​ Отсутствие команды​​Совет:​ скопировать как связанный​

4. ​ содержимое (целиком или​​ или файл с​​.​

5. ​ не имея доступа​ кнопок внизу страницы.​

   • ​Первый квартал​ позволяет перейти к​​Смешанная ссылка включает в​​Kuzmich​

   • ​ остальные макросы. А​ так окошко выскакивает​​ макросе «Копирование списка».​​ аргумента нужен будет​ памяти.​Изменить связи​​ Для выделения нескольких связанных​​ или внедренный объект.​ частично) из другой​ помощью маркеров изменения​​Нажмите кнопку​​ к исходным данным.​ Для удобства также​​книги, сохраненной по​​ другому месту в​

​ себя оба способа​: Так вы запустили​ вот каким кодом​

1. ​ и видно, что​ Спасибо.​ полный путь к​    Убедитесь, что на компьютере​означает, что файл​

2. ​ объектов щелкните каждый​​На вкладке​​ программы.​​ размера. Чтобы найти​​Обзор​​ Поскольку внедренный объект​​ приводим ссылку на​

   

3. ​ адресу http://example.microsoft.com/report. В​ текущей книге или​ использования исходных данных.​ этот файл .​ его сразу после​ вместо полного пути​

4. ​Kuzmich​​ файлу (с расширением!),​​ имеется достаточно памяти​​ не содержит связанных​​ из них, удерживая​Главная​​Создать ссылку на контент​​ маркеров, щелкните файл​​и выберите файл,​​ не связан с​

5. ​ оригинал (на английском​ ячейке листа, содержащей​

   • ​ открыть документ, расположенный​При создании ссылки «Эксель»​ (Оба файла должны​​ открытия сохранить я​​ там только имя​

   • ​: У вас же​ имя листа и​ для запуска исходной​​ данных.​​ нажатой клавишу CTRL.​​в группе​​ из другой программы​ или значок один​ который должна указывать​ исходным файлом, он​ языке) .​ гиперссылку, в качестве​​ на сетевом сервере,​​ на ячейку другого​

Изменение способа отображения объекта OLE

1. ​ быть открыты)​ не знаю, потому​ файла, т е​ в прошлой теме​​ адрес ячейки:​​ программы. В случае​​В списке​​ Чтобы выделить все​​Буфер обмена​​Щелкните лист, на который​​ раз.​​ ссылка.​

2. ​ не обновляется при​Чтобы включить содержимое из​

   • ​ текста ссылки отобразится​ в интрасети или​​ файла следует использовать​​su60​

   • ​ что ещё не​ макрос думает, что​​ в этом файле​​Аналогично внутренней ссылке, если​ необходимости для освобождения​Исходный файл​ связанные объекты, нажмите​нажмите кнопку​​ необходимо поместить связанный​​Можно просто добавить ссылку​Установите флажок​ изменении исходных данных.​​ других программ, например​​ «Щелкните, чтобы вывести​​ в Интернете. При​​ имя для ссылки​

Управление обновлением в связанных объектах

​: Да, оба открыты.​ волшебник, а только​ это имя корня​ был диалог выбора​ имя листа содержит​ памяти закройте другие​выберите источник связанного​ клавиши CTRL+A.​Копировать​ объект.​ на объект, а​Связь с файлом​ Чтобы изменить внедренный​ Word или Excel​

Установка обновления вручную связи с другой программой

1. ​ итоги по отделу​​ щелчке ячейки, содержащей​​ на используемые ячейки.​​Kuzmich​​ учусь. Может кто​​ и понятно не​​ открываемого файла,​

   

   ​ пробелы, то его​​ программы.​​ объекта, а затем​​Если изменения связанных объектов​.​На вкладке​

2. ​ не ее внедрения​​, а затем нажмите​​ объект, дважды щелкните​ можно использовать объект​ за первый квартал».​​ функцию​​ С применением имени​​: Открытый файл «Шаблон​​ подскажет? Т е​ находит файл. Если​​почему ушли от​​ необходимо дополнительно заключить​​Закройте все диалоговые окна.​​ нажмите кнопку​​ необходимо производить при​​Перейдите к листу, на​

   ​Вставка​​ полностью. Можно сделать,​ кнопку​ его для открытия​ связывание и внедрение​=ГИПЕРССЫЛКА(«http://example.microsoft.com/Annual Report.docx]КвартПриб», «Квартальный отчет​ГИПЕРССЫЛКА​ использование значений необходимых​

3. ​ заявки на подбор»​ сразу после открытия​ поставить перед именем​​ этого​​ в апострофы.​​    Если исходная программа запущена,​​Открыть​

Установка автоматического обновления связи с другой программой

1. ​ выборе команды​​ который нужно поместить​​в группе​​ если книгу и​​ОК​​ и редактирования в​​ (OLE).​

   

   ​ о прибыли»)​​, Excel перейдет к​​ ячеек упрощается. Такие​​ , с какой​ файла егонадо сохранить.​ файла обратный слеш​

2. ​su60​​Также поддерживаются сетевые ссылки,​​ убедитесь, что в​.​Обновить значения​​ данные, и щелкните​​Текст​​ объект, который вы​​.​ исходной программе. Исходная​​Интерфейс OLE поддерживается множеством​​Чтобы создать гиперссылку на​​ заданному месту или​​ ссылки не изменяются​

   ​ цифрой в окне​​Kuzmich​ и сохранить и​: Я не ушёл.​ если файл сохранен,​ ней нет открытых​Внесите нужные изменения в​, нажмите​

3. ​ в том месте,​​нажмите кнопку​​ хотите добавить хранятся​

​Можно создать новую объекта​ программа (или другая​ различных программ и​

​ определенное место в​​ откроет указанный документ.​​ при перемещении исходных​ Excel ?​​: Не надо вам​ не закрывая файла​​ В прошлой теме​

​ например, на корпоративном​ диалоговых окон. Переключитесь​ связанный объект.​Вручную​

1. ​ где требуется их​​Объект​ ​ на сайте SharePoint,​​ на основании другая​​ программа, позволяющая редактировать​​ используется для помещения​​ файле Word, необходимо​

2. ​ГИПЕРССЫЛКА​​ данных либо самих​​bonkers​ его сохранять. Вам​​ выполнить макрос, то​ я остальные макросы​​ сервере в общей​

Немедленное обновление связи с программой

1. ​ в исходную программу​​Выйдите из исходной программы,​​.​​ расположить.​​.​​ общем сетевом диске​​ программа не выходя​

   

   ​ объект) должна быть​​ содержимого, созданного в​​ сначала с помощью​​(адрес;[имя])​ ссылок, так как​: всем привет!​

2. ​ надо из него​​ всё ОК. Макрос​​ удалил для ясности​ папке — в​

   ​ и закройте все​​ чтобы вернуться в​На вкладке​На вкладке​Откройте вкладку​ или же расположении​ из книги. Например​ установлена на компьютере.​

3. ​ одной программе, в​​ закладки определить место​​Аргументы функции ГИПЕРССЫЛКА описаны​

Изменение содержимого из программы OLE

​ имя ссылается на​есть книга с​ скопировать диапазон в​ выпоняется, путь распознаётся​

​ и оставил только​ этом случае используется​

1. ​ открытые диалоговые окна.​​ конечный файл.​​Данные​​Главная​​Из файла​​ и расположение файлов​​ если вы хотите​

   

   ​Изменение способа отображения объекта​​ другую программу. Например,​​ в файле, куда​​ ниже.​ конкретный диапазон ячеек.​ множеством всяких листочков,​

2. ​ массив и закрыть,​​ и пишется полный.​​ макрос с проблемой.​ путь в формате​Закройте исходный файл.​​Редактирование внедренного объекта в​​в группе​

3. ​в группе​.​

4. ​ не изменится. Это​ добавить более подробное​ OLE​

​ можно вставить документ​ должен выполняться переход.​

1. ​Адрес​Как происходит?​

2. ​ таблиц, расчетов и​

3. ​ не сохраняя.​ Но стоит закрыть​ Та проблема решилась​ UNC, начинающийся с​    Если исходный файл является​ исходной программе​

   ​Подключения​Буфер обмена​В поле​ удобно, если связанный​ описание диаграммы или​В книге связанный объект​ Office Word в​

​ В приведенном ниже​​    — обязательный аргумент. Путь​Открываем исходный файл Excel,​ пр.​RAN​ файл — всё​ с помощью форума​ двух обратных дробей:​ связанным объектом, убедитесь,​Дважды щелкните внедренный объект,​нажмите кнопку​щелкните стрелку под​Имя файла​​ объект изменяется, так​​ таблицы, можно создать​​ или внедренный объект​​ книгу Office Excel.​​ примере создается гиперссылка​​ и имя открываемого​ в котором проводится​​есть связи с​​: При использовании шаблона​

​ та же петрушка,​ и теперь остался​Если вы создали именованный​

1. ​ что он не​ чтобы его открыть.​

2. ​Изменить связи​ кнопкой​введите имя файла​ как ссылка всегда​​ внедренный документ, например​​ может отображаться либо​​ Чтобы посмотреть, содержимое​​ на закладку​​ документа. Адрес может​​ работа, и второй,​​ другим xls-файлом​​ происходит не открытие​

3. ​ хоть со слешем,​ последний вопрос со​

   • ​ диапазон (например, через​ открыт другим пользователем.​Внесите необходимые изменения.​.​​Вставить​​ или нажмите кнопку​

   • ​ открывается последнюю версию​ файл Word или​ в том же​ какого типа можно​КвартПриб​​ указывать на определенное​​ данные которого необходимо​

Выделение объекта OLE с помощью клавиатуры

1. ​как найти ячейки​ существующей книги, а​​ хоть без него.​​ ссылками.​

2. ​Формулы — Диспетчер имен​​Убедитесь, что имя исходного​​Если изменение объекта происходит​​Примечание:​​и выберите команду​​Обзор​​ документа.​

3. ​ PowerPoint в Excel.​ виде, что и​ вставить, на вкладке​в файле​

4. ​ место в документе,​

5. ​ использовать в текущем​​ в которых применяются​​ создается новая, на​​ В инете нашёл​​Kuzmich​​ — Создать​​ файла не изменилось.​

Проблема: при двойном щелчке по связанному или внедренному объекту появляется сообщение «Нельзя изменить»

​ прямо в окне​ Отсутствие команды​Специальная вставка​

​для выбора файла​Примечание:​​ Вы можете установить​ в исходной программе,​Вставка​Annual Report.doc​ например на ячейку​ файле.​

​ такие ссылки на​ основании выбранного шаблона.​​ штук пять разных​: Я обычно использую​), то можно спокойно​    Если исходный файл, который​ открытой программы, щелкните​Изменить связи​.​

​ из списка.​​ Если связанный файл переместить,​ для отображения объекта​ либо в виде​в группе​, сохраненном по адресу​ или именованный диапазон​В исходном выделяем ячейку,​

​ другой файл ?​​ И как всякая​ вариантов прописи относительной​ диалог выбора файла​ использовать это имя​

​ требуется изменить, является​ за пределами объекта,​​означает, что файл​Выполните одно из следующих​Установите флажок​ ссылка не будет​ вправо на листе​ значка. Если книга​Текст​ http://example.microsoft.com.​ листа или книги​ в которой требуется​nerv​ вновь созданная книга,​ ссылки и все​​ Application.FileDialog(msoFileDialogFilePicker)Там можно прописать​​ в ссылке:​​ связанным объектом, убедитесь,​​ чтобы вернуться в​​ не содержит связей​​ действий.​Связь с файлом​ работать.​​ или добавить значок,​​ будет просматриваться через​​выберите элемент​​=ГИПЕРССЫЛКА(«\FINANCEStatements1stqtr.xlsx», D5)​ Excel либо на​ создать ссылку, то​

support.office.com

Создание внутренних и внешних ссылок функцией ГИПЕРССЫЛКА

​: искать по формулам​ она имеет только​ работают одинаково как​ путь к вашей​

• ​Если нужно сослаться на​ что он имеет​
• ​ конечный файл.​
• ​ с другими файлами.​
• ​Для вставки данных в​.​Щелкните ячейку листа, в​
• ​ который открывает файл.​

​ Интернет и ее​Объект​Отображает содержимое ячейки D5​ закладку в документе​ есть использовать значения​Alex_ST​

​ имя. Так откуда​

​ описано выше. Может​

• ​ папке InitialFileName =​​ именованный диапазон во​ то же имя,​Если изменение объекта выполняется​В списке​ качестве связанного объекта​Выполните одно из следующих​ которую вы хотите​Щелкните ячейку листа, в​ не придется печатать,​
• ​. В поле​​ в качестве текста​ Microsoft Word. Путь​ другого документа.​: Попробуйте найти (Ctrl+F)​

​ же взять путь​ что-то с настройками​

Ссылка на веб-страницу

​И при открытии​ внешнем файле, то​ что и при​​ в исходной программе,​​Источник​ выберите команду​ действий.​

​ вставить объект.​ которую вы хотите​ можно выбрать отображение​Тип объекта​ ссылки и открывает​ может представлять собой​Вводим в ячейку знак​ выражение:​ к этому файлу?​

Ссылка на ячейку внутри книги

​ компа или excel?​ окна будет сразу​ потребуется уточнить его​ создании связи, а​ открытой в отдельном​выберите связанный объект,​

​Связать​Чтобы отобразить содержимое объекта,​На вкладке​ вставить объект.​ этого объекта в​

​отображаются только объекты​ книгу, сохраненную на​ путь к файлу​ равенства. Если с​=*[*]*~!​

Ссылка на ячейку во внешней книге

​Если вам нужны​ Ну не может​ открываться эта папка​ имя и путь​ также что он​ окне, для возврата​ который необходимо обновить.​.​ снимите флажок​

​Вставка​На вкладке​ виде значка. Это​ программ, установленных на​ сервере​

Ссылка на файл на сервере

​ на жестком диске,​ данными ссылки необходимо​KuklP​ в шаблоне макросы,​ же быть чтобы​su60​ к нему, как​ не был перемещен.​ в конечный файл​

Ссылка на именованный диапазон

​ Буква​Чтобы вставить данные в​​В виде значка​в группе​​Вставка​ уменьшает площадь, занимаемую​ данном компьютере и​

​FINANCE​ UNC-путь к местоположению​ выполнить вычисления, то​: Дим, а ты​ сохраняйте сего как​ вообще нельзя было​: Да, видимо я​ в предыдущем пункте.​ Чтобы узнать имя​

Ссылка на умную таблицу или ее элементы

​ выйдите из исходной​A​ качестве внедренного объекта,​.​Текст​в группе​ объектом на экране.​​ поддерживающих интерфейс OLE.​​в общей папке​ на сервере (в​ далее вносится функция​ Лешкино сообщение не​ xlsm, при открытии​ пользоваться относительными ссылками.​ не ясно задал​ Имя листа указывать​​ исходного файла, выделите​​ программы.​в столбце​

​ выберите команду​

• ​Чтобы отобразить значок, установите​​нажмите кнопку​текст​ Для просмотра этого​Данные, которые копируются в​
• ​Statements​​ приложении Microsoft Excel​​ либо другие значения,​​ читал?:-)​ сохраняйте как (SaveAs)​Kuzmich​ вопрос.​
• ​ уже не нужно:​​ связанный объект, а​Примечание:​Обновить​Вставить​
• ​ флажок​​Объект​нажмите кнопку​ объекта в исходном​

Формирование заполненной формы письма email

​ Excel из другой​. В данном примере​ для Windows) либо​ которые должны предшествовать​

​bonkers​ с нужныь именем,​: У вас же​

​Kuzmich​Если вы знакомы с​ затем на вкладке​  Если дважды щелкнуть​означает автоматическое обновление​. В поле​отобразить в виде значка​.​объект​ виде необходимо дважды​ программы, поддерживающей интерфейс​ используется путь в​ URL-адрес в Интернете​ значению ссылки.​

Использование нестандартных символов

​: спасибо!​ и с этим​ все книги в​: Задайте ясно.​ умными таблицами, то​Данные​ некоторые внедренные объекты,​ связи, а буква​Как​

planetaexcel.ru

Относительные ссылки на файл excel в макросе.

​. При необходимости Чтобы​​Откройте вкладку​.​ щелкнуть его значок.​ OLE (например, Word),​ формате UNC.​ или интрасети.​Переходим ко второму файлу​действительно элементарно, к​ файлом работайте. У​ одной папке, поэтому​Подошел ли вам​ знаете какая это​в группе​ такие как видео-​M​выберите элемент, в​ изменить изображение по​Создание из файла​

​На вкладке​​Более новые версии​ можно вставить как​=ГИПЕРССЫЛКА(«D:FINANCE1stqtr.xlsx»; H10)​Примечание.​ с необходимыми нам​
​ тому же названия​ него путь будет.​

​ fName = ThisWorkbook.Path​​ вариант, который я​ полезная штука. При​Подключения​ и звуковые клипы,​в столбце​ названии которого есть​ умолчанию значка или​.​Новый​ Office 2010 –​ связанный объект или​

​Открывает книгу​​   Excel Online В Функция​ данными, выбираем лист​ «связанного» файлика известно​su60​ & «Шаблон заявки​
​ указал в прошлой​ желании, можно легко​выберите команду​

​ начнется их воспроизведение,​​Обновить​ слово «объект». Например,​ метки, щелкните​

​Нажмите кнопку​​выберите в списке​
​ 2013 Office 2007​ внедренный объект. Основные​1stqtr.xlsx​ ГИПЕРССЫЛКА применима только​

​ документа, содержащий ячейки,​​Alex_ST​: Да вы правы.​ на подбор.xlt»​ теме?​ создать с помощью​Изменить связи​ а не открытие.​ — обновление вручную.​ если данные копируются​Значок «Изменить»​Обзор​ тип объекта, который​ ​ различия между внедренными​, которая находится в​ для веб-адресов (URL).​

​ на которые нужно​​: А всё-таки, ИМХО,​
​ Но для сохранения​
​su60​su60​ функции​. Если исходный файл​ Чтобы изменить такой​Совет:​

​ из документа Word,​​, нажмите и нажмите​и выберите файл,​ вы хотите вставить.​Щелкните ячейку листа, в​ и связанными объектами​ каталоге​ Адресом может быть​ сослаться.​ восклицательный знак лишним​ потребуется абсолютный путь.​: Да я пробовал​: В макросах есть​ГИПЕРССЫЛКА (HYPERLINK)​ был переименован или​ внедренный объект, щелкните​ Для выделения нескольких связанных​ выберите элемент​ кнопку значок, который​ который должна указывать​ Если вы хотите​ которую вы хотите​ заключаются в том,​Finance​ текстовая строка, заключенная​Выделяем ячейку или группу​
​ не будет.​ А изначально задача​ и эту формулу,​ абсолютные ссылки и​
​ссылку на любой​ перемещен, воспользуйтесь кнопкой​ правой кнопкой мыши​

​ объектов щелкните каждый​​Объект документа Microsoft Word​ вы хотите из​ ссылка.​

​ вставить в электронную​​ вставить объект.​
​ где хранятся данные​на жестком диске​ в кавычки, или​
​ ячеек, на данные​
​Меньше вероятность неверного​
​ стояла отвязаться от​ результат тот же.​ чтобы файл работал​
​ нужный нам фрагмент​Смена источника​ значок или объект,​ из них, удерживая​
​.​ списка​

​Установите флажок​​ таблицу значок, а​На вкладке​ и как обновляется​ D. После этого​ ссылка на ячейку,​ которых требуется создать​ поиска внешней связи.​ абсолютных ссылок, чтобы​ Но не всё​ будучи перенесённым с​ умной таблицы или​в диалоговом окне​ наведите указатель на​ нажатой клавишу CTRL.​Щелкните правой кнопкой мыши​значок​Связь с файлом​ не сам объект,​Вставка​ объект после вставки​ выводится число, которое​ имеющая вид текстовой​ ссылку.​Ведь в ячейке​ база могла работать​ так темно как​ его папкой в​ на нее целиком.​Изменение связей​ элемент​ Чтобы выделить все​ значок или объект,​в поле​, а затем нажмите​ установите флажок​в группе​

​ в конечный файл.​​ содержится в ячейке​ строки.​Если формула предполагает внесение​ вполне может быть​ из любого места​ раньше. Сейчас я​

​ другое место, нужно​​ Для этого в​, чтобы найти исходный​Объект​ связанные объекты, нажмите​ наведите указатель на​заголовок​ кнопку​В виде значка​текст​ Внедренные объекты хранятся​ H10.​Если указанный в​ дополнительных функций или​ и формула типа​ куда её ни​ выяснил вот что.​ поменять эти ссылки​ первом аргументе нужно​ файл и восстановить​ ​ клавиши CTRL+A.​ элемент​введите метку.​ОК​.​нажмите кнопку​ в той книге,​=ГИПЕРССЫЛКА(«[C:My DocumentsMybook.xlsx]Итоги»)​ адресе переход не​ данных, то переходим​=»что-то там [никто​ положи, хоть с​ Приложенный файл (он​ на соответствующие этому​ указать имя таблицы​ связь.​тип объекта​Нажмите кнопку​Объект​Примечание:​.​Нажмите кнопку​объект​ в которую вставлены,​Создает гиперссылку на область​ существует или недоступен,​ к исходному документу​

​ не знает, что],​​ флешки. Но пока​ же и проблемный)​ новому месту. Нельзя​ (например​Это простая, но весьма​
​(например,​ОК​ ​ Команду​Можно создать новую объекта​
​ОК​

​.​​ и не обновляются.​Totals​ при выборе ячейки​ и дополняем формулу,​ да плюс ещё​
​ похоже задачка решения​ когда открывается, то​ ли уйти от​Таблица1​ полезная функция, позволяющая​Объект Клип мультимедиа​.​тип объекта​Объект​ на основании другая​. В зависимости от​В диалоговом окне​ Связанные объекты остаются​в другой (внешней)​ отображается сообщение об​ после чего завершаем​ чуть-чуть»​ не имеет.​ открывается он уже​ этой проблемы применением​) и кодовое обозначение​ создать живую ссылку​), а затем выберите​Проблема: не удается обновить​(например,​нельзя использовать для​ программа не выходя​ типа вставляемого файла​

​объект​​ в отдельных файлах​ книге​ ошибке.​ операцию нажатием клавиш​:)​su60​

​ под именем «Шаблон​​ относительных ссылок привязанных​ ее элемента:​ на:​ команду​ автоматические связи на​Объект Документ​ вставки графики и​ из книги. Например​ откроется новое окно​щелкните вкладку​ и могут обновляться.​
​Mybook.xlsx​Имя​ Ctrl+Shift+Enter.​хотя, если подумать,​: Kuzmich, вы правы,​ анкеты кандидата 1″.​ к этой папке?​Поддерживаются следующие обозначения:​любую ячейку на любом​

​Изменить​​ листе​) и выберите команду​ файлов определенных типов.​ если вы хотите​ программы или появится​Создание из файла​Связанные и внедренные объекты​.​    — необязательный аргумент. Текст​В исходном файле просматриваем​ то с таким​ но тогда путь​ Создаёт новый файл,​

​ Чтобы не нужно​​Таблица1[#Все]​ листе в книге​.​Параметр​Преобразовать​ Чтобы вставить графическое​ добавить более подробное​ окно редактирования.​.​ в документе​=ГИПЕРССЫЛКА(«[Книга1.xlsx]Лист1!A10»;»Перейти на Лист1 >​

​ ссылки или числовое​​ итоговую формулу, при​ же успехом формула​
​ к файлу в​ чтобы не испортить​ было менять пути​
​- ссылка на​именованный диапазон​Редактирование внедренного объекта в​Автоматически​
​.​ изображение или файл,​ описание диаграммы или​Создайте объект, который вы​

​Нажмите кнопку​​1. У внедренного объекта​ A10″)​ значение, отображаемое в​ необходимости корректируем ее,​ может быть и​ который мы помещаем​
​ сам шаблон. И​
​ в макросе.​ всю таблицу, включая​

​фрагмент умной таблицы​​ программе, отличной от​в Excel переопределяется​Выполните одно из следующих​ на вкладке​ таблицы, можно создать​

​ хотите вставить.​​Обзор​ нет связи с​Чтобы перейти в другое​ ячейке. Имя отображается​

​ после чего снова​​=»что-то там [никто​ скопированный диапазон должен​ макрос не может​

​marchenkoan​​ заголовки столбцов, данные​внешний файл Excel на​ источника​ параметром​
​ действий.​Вставка​ внедренный документ, например​Если Excel открыл новое​и выберите файл,​ исходным файлом.​ место на текущем​ синим цветом с​

​ нажимаем Ctrl+Shift+Enter.​​ не знает, что],​ быть абсолютным. А​ прописать полный путь​: Добрый вечер.​ и строку итогов​ диске или на​

​Выделите внедренный объект, который​​Обновить ссылки на другие​Чтобы отобразить содержимое объекта,​в группе​ файл Word или​

​ окно программы для​​ который вы хотите​

​2. Связанный объект связан​​ листе, укажите имя​ подчеркиванием. Если этот​Как выглядит?​ да плюс ещё​ это уже выходит​

planetaexcel.ru

как найти ссылки на другой файл?

​ из относительной ссылки​​Попробуйте так​
​Таблица1[#Данные]​ сервере в сети​ необходимо изменить.​ документы​
​ снимите флажок​Иллюстрации​
​ PowerPoint в Excel.​ создания объекта, вы​ вставить.​ с исходных файлом.​

​ книги и имя​​ аргумент опущен, в​

​Ссылка на значение одной​​ много!»​ за рамки поставленной​
​ и найти файл.​

​fName = ThisWorkbook.Path​​или просто​веб-страницу​Щелкните правой кнопкой мыши​

​.​​В виде значка​
​нажмите кнопку​ Вы можете установить​ можете работать непосредственно​

​Если вы хотите вставить​​3. При обновлении исходного​ листа, как в​ ячейке в качестве​
​ ячейки: =[Источник.xls]Лист1!А1​:)​
​ задачи. Или может​ А вот если​ & «База HRШаблон​
​Таблица1​Кроме того, эта функция​ значок или объект,​Чтобы обеспечить автоматическое обновление​
​.​
​Рисунок​ для отображения объекта​ в нем.​ значка в электронную​
​ файла обновляется связанный​ этом примере, где​ текста ссылки отображается​Ссылка на значение диапазона​
​:)​
​ я чего-то не​

planetaexcel.ru

​ не закрывая файл​

Skip to content

Sub OtpravitPismoSSsilkoiNaFail()
'Шаг 1: Объявляем переменные
Dim OLApp As Outlook.Application
Dim OLMail As Object

'Шаг 2: Откройте Outlook, запустите новое сообщение
Set OLApp = New Outlook.Application
Set OLMail = OLApp.CreateItem(0)
OLApp.Session.Logon

'Шаг 3: Строим наше сообщение и отправляем
With OLMail
    .To = "admin@datapigtechnologies.com; mike@datapigtechnologies.com"
    .CC = ""
    .BCC = "
    .Subject = "Ежемесячный отчет по электронной почте со ссылкой"
    .HTMLBody = _
    "<p>Ежемесячный отчет готов. Нажмите на ссылку, чтобы получить его.
   </p>" & _
    "<p><a href=" & Chr(34) & "Z:DownloadsЕжемесячный Отчет.xlsx" & _
Chr(34) & ">Download Now</a></p>"
    .Display
End With

'Шаг 4: Очистка памяти
Set OLMail = Nothing
Set OLApp = Nothing
End Sub

Хитрости »

24 Февраль 2012              91378 просмотров

Иногда бывает необходимо перенести что-то из Excel в другое приложение. Я возьму для примера Word. Например скопировать ячейки и вставить. Обычно мы это так и делаем — скопировали в Excel, открыли Word — вставили. Но сделать это при помощи кода чуть сложнее, хотя если разобраться никаких сложностей нет. Ниже приведен пример кода, который открывает Word, открывает в нем определенный документ, копирует данные из Excel и вставляет в открытый документ Word.

Sub OpenWord()
    Dim objWrdApp As Object, objWrdDoc As Object
    'создаем новое приложение Word
    Set objWrdApp = CreateObject("Word.Application")
    'Можно так же сделать приложение Word видимым. По умолчанию открывается в скрытом режиме
    'objWrdApp.Visible = True
    'открываем документ Word - документ "Doc1.doc" должен существовать
    Set objWrdDoc = objWrdApp.Documents.Open("C:Doc1.doc")
    'Копируем из Excel диапазон "A1:A10"
    Range("A1:A10").Copy
    'вставляем скопированные ячейки в Word - в начала документа
    objWrdDoc.Range(0).Paste
    'закрываем документ Word с сохранением
    objWrdDoc.Close True    ' False - без сохранения
    'закрываем приложение Word - обязательно!
    objWrdApp.Quit
    'очищаем переменные Word - обязательно!
    Set objWrdDoc = Nothing: Set objWrdApp = Nothing
End Sub

Скачать пример:

  Tips_Macro_OpenWord.xls (49,5 KiB, 6 261 скачиваний)

В файле-примере, приложенном к данной статье, в комментариях к коду есть несколько добавлений. Например, как вставить текст из ячеек в определенные закладки Word-а и как добавить новый документ, а не открывать уже имеющийся. Так же так есть код проверки — открыто ли приложение Word в данный момент. Порой это тоже может пригодиться, чтобы работать с запущенным приложением Word, а не создавать новое:

Sub Check_OpenWord()
    Dim objWrdApp As Object
    On Error Resume Next
    'пытаемся подключится к объекту Word
    Set objWrdApp = GetObject(, "Word.Application")
    If objWrdApp Is Nothing Then
        'если приложение закрыто - создаем новый экземпляр
        Set objWrdApp = CreateObject("Word.Application")
        'делаем приложение видимым. По умолчанию открывается в скрытом режиме
        objWrdApp.Visible = True
    Else
        'приложение открыто - выдаем сообщение
        MsgBox "Приложение Word уже открыто", vbInformation, "Check_OpenWord"
    End If
End Sub

В принципе, активировать или вызвать(если закрыто) другое приложение Офиса можно одной строкой:

Sub Open_AnotherApp()
    Application.ActivateMicrosoftApp xlMicrosoftWord
End Sub

но данный метод может пригодиться только в том случае, если Вам необходимо действительно лишь активировать другое приложение, но дальше обращаться к этому приложению Вы уже не сможете.

По сути, методами CreateObject и GetObject можно обратиться к любому стороннему приложению(например Internet Explorer). Куда важнее при обращении к этим объектам знать объектную модель того приложения, к которому обращаетесь. Чтобы увидеть свойства и методы объектной модели приложения, можно в редакторе VBA подключить необходимую библиотеку, объявить переменную, назначив ей тип приложения. Покажу на примере того же Word-а.
Для начала открываем меню Tools -References:

Подключаем библиотеку:

Затем объявляем переменную и присваиваем ей тип нужного приложения:

Sub OpenWord()
    Dim objWrdApp As Word.Application
    Set objWrdApp = New Word.Application
    objWrdApp.Visible = True
End Sub

Если теперь в редакторе, внутри этой процедуры в любом месте ниже объявления переменной набрать objWrdApp и точку, то сразу после ввода точки выпадет меню, в котором будут перечислены все доступные методы и свойства этого приложения.

Так же можно нажать F2 и через поиск найти Word и просмотреть все методы и свойства данного приложения.

Метод установки ссылки на библиотеку приложения через Tools—References называют еще ранним связыванием. Подобный метод позволяет создать ссылку на приложение быстрее и, как описано выше, предоставляет разработчику доступ к визуальному отображению свойств и методов объекта. Но есть существенный минус: если в своем коде Вы установите ссылку на Word 12 Object Libbary(Word 2007), то на ПК с установленным Word 2003 получите ошибку MISSING, т.к. Word 2003 относится к библиотеке Word 11 Object Libbary. Подробнее можно прочитать в статье Ошибка — Cant find project or library.
Метод же CreateObject еще называется методом позднего связывания. Применяя его не возникнет проблем с MISSING, очень часто возникающих при раннем связывании. Поэтому я рекомендовал бы при разработке использовать раннее связывание для удобства использования свойств и методов(если Вы их не знаете), а перед распространением приложения в коде заменить все именованные константы(типа wdLine) на числовые константы(для wdLine это 5) и применить позднее связывание. Посмотреть числовое значение константы можно просто записав её в коде, начать выполнение кода через F8 и навести курсор мыши на эту константу. Всплывающая подсказка покажет числовое значение. Так же можно отобразить окно Immediate(View —Immediate Window или сочетание клавиш Ctrl+G), записать вопросительный знак и вставить эту константу и нажать Enter:
?wdLine
ниже будет выведено числовое представление этой константы.
А заменять эти константы их числовыми значениями в случае с поздним связыванием необходимо, т.к. Excel не знает их значений.
Попробую пояснить поподробнее про эти константы и почему их надо заменять какими-то числами: при подключении библиотеки Wordа(Word 12 Object Libbary) мы так же подключаем и все свойства, методы и константы, которые доступны из Wordа. И их использование напрямую становится доступно из Excel и мы можем смело написать что-то вроде wbLine и Excel поймет эту константу. При позднем же связывании мы уже не подключаем библиотеки Word(во избежание ошибок совместимости) и как следствие — методы, свойства и константы Wordа для Excel становятся чем-то неизвестным и не документированным и мы получим ошибку «Variable not defined»(если включена директива Option Explicit) при попытке назначить свойство через wdLine. Если же Option Explicit не включена — то хоть ошибки не будет, но и код будет работать неверно, т.к. для неизвестной для Excel переменной wbLine будет назначено значение 0(Empty). Поэтому и надо все константы другого приложения заменять их числовыми значениями.

Главная ошибка новичка
И хочу так же упомянуть про ошибку, которую очень часто совершают при обращении к одному приложению из другого. Допустим, необходимо скопировать из Word все данные в Excel. Часто начинающие делают это так:

Sub OpenWord()
    Dim objWrdApp As Object, objWrdDoc As Object
    'создаем новое приложение Word
    Set objWrdApp = CreateObject("Word.Application")
    'Можно так же сделать приложение Word видимым. По умолчанию открывается в скрытом режиме
    'objWrdApp.Visible = True
    'открываем документ Word - документ "Doc1.doc" должен существовать
    Set objWrdDoc = objWrdApp.Documents.Open("C:Doc1.doc")
    'Копируем из Word все данные, обращаясь к объекту Range документа
    Range.Copy
    'вставляем скопированное в ячейку А1 активного листа Excel
    ActiveSheet.Paste
    'закрываем документ Word без сохранения
    objWrdDoc.Close False
    'закрываем приложение Word
    objWrdApp.Quit
    'очищаем переменные Word - обязательно!
    Set objWrdDoc = Nothing: Set objWrdApp = Nothing
End Sub

На строке Range.Copy обязательно получите ошибку от VBA, указывающую, что нужен аргумент для объекта. Можно попробовать добавить этот аргумент: Range(1).Copy. Но все равно получим ошибку. Можно, конечно, указать даже ячейки: Range(«A1»).Copy. Но это приведет к тому, что скопирована будет ячейка А1 активного листа Excel.
Все дело в том, что мы хотим скопировать данные из Word-а, выполняя при этом код из Excel. А у Excel тоже есть объект Range с другими аргументами. И если не указать какому приложению, листу или документу принадлежит Range, то по умолчанию он будет отнесен к тому приложению, из которого выполняется код. Т.е. к Excel. Если совсем кратко об этом — всегда надо указывать какому приложению или объекту принадлежит используемый объект или свойство. Правильно код должен выглядеть так:

Sub OpenWord()
    Dim objWrdApp As Object, objWrdDoc As Object
    'создаем новое приложение Word
    Set objWrdApp = CreateObject("Word.Application")
    'Можно так же сделать приложение Word видимым. По умолчанию открывается в скрытом режиме
    'objWrdApp.Visible = True
    'открываем документ Word - документ "Doc1.doc" должен существовать
    Set objWrdDoc = objWrdApp.Documents.Open("C:Doc1.doc")
    'Копируем из Word все данные, обращаясь к объекту Range документа
    'при этом перед Range явно указываем откуда его брать - из документа Word -objWrdDoc("C:Doc1.doc")
    objWrdDoc.Range.Copy
    'вставляем скопированное из Word в активную ячейку активного листа Excel
    ActiveSheet.Paste
    'закрываем документ Word без сохранения
    objWrdDoc.Close False
    'закрываем приложение Word
    objWrdApp.Quit
    'очищаем переменные Word - обязательно!
    Set objWrdDoc = Nothing: Set objWrdApp = Nothing
End Sub

Вместо Range ту же ошибку делают и с Selection(потому что Selection часто присутствует в записанных макрорекордером макросах), т.к. этот объект есть и в Excel и в Word и без явного указания приложения будет относится к приложению, в котором записано.

В приложенном файле код немного отличается от представленных выше — в нем можно посмотреть как вставить текст из ячеек в определенные(созданные заранее) закладки Word-а. Это удобно для создания бланков в Word и заполнения их через Excel

Скачать пример:

  Tips_Macro_OpenWord.xls (49,5 KiB, 6 261 скачиваний)

А в архиве ниже — практически готовое решение заполнения всевозможных бланков Word из Excel. Как это работает. У нас есть таблица Excel с данными для заполнения бланков заявлений на пособия:

Обращаю внимание, что в первой строке расположены метки. Они нужны для того, чтобы код мог понять значения какого столбца в какое место шаблона Word должны попасть. А в самом шаблоне Word мы должны проставить эти самые метки:

Фигурные скобки сделаны для того, чтобы код 100% искал и заменял только метку в шаблоне, исключая при этом замену случайного текста вне скобок(ведь слово «Должность» может встречаться и само по себе).
А здесь я схематично привел то, как будут происходить замены:

Сначала программа создаст новую папку, в которую и будет сохранять создаваемые файлы(имя папки состоит из даты и времени запуска кода). Далее программа циклом пройдется по каждой строке таблицы, создаст на основании шаблона Word(«Шаблон.doc») новый файл для этой строки, заполнит этот шаблона данными на основании меток, и сохранит созданный файл под новым именем. Сам файл шаблона при этом не изменяется — все метки в нем сохраняются как были настроены до запуска кода. Конкретно в приложенном коде значение для имени нового файла берется из первого столбца «ФИО с инициалами». Но это можно изменить в коде при необходимости. Делается это в этой строке:

'считываем фамилию с инициалами
sWDDocName = .Cells(lr, 1).Value

Что еще важно: файл шаблона Word должен находиться в той же папке, что и файл с кодом. Название файла в приложенном к статье файле должно быть «Шаблон.doc». Но его так же можно изменить, не забыв изменив его в коде в этой строке:

'имя шаблона Word с основным текстом и метками
Const sWDTmpl As String = "Шаблон.doc"

В общем-то, если хоть чуть-чуть разбираетесь, то поменять можно многое. А для тех, кто не разбирается достаточно будет просто создавать метки в файле Word и обозначать ими столбца в таблице Excel. Количество столбцов и строк в таблице код определяет автоматически и при изменении размеров таблицы ничего изменять не надо. Главное, чтобы метки находились в первой строке, вторая строка — заголовок(необязательно), а с третьей строки начинаются данные, которые и используются для наполнения шаблонов.
Скачать пример:

  Автосоздание бланков Word из таблицы Excel.zip (37,6 KiB, 1 468 скачиваний)

Примеры работы с тем же Outlook можно посмотреть в моих статьях:
Как отправить письмо из Excel?
Сохранить вложения из Outlook в указанную папку

Статья помогла? Поделись ссылкой с друзьями!

    Видеоуроки

Поиск по меткам



Access
apple watch
Multex
Power Query и Power BI
VBA управление кодами
Бесплатные надстройки
Дата и время
Записки
ИП
Надстройки
Печать
Политика Конфиденциальности
Почта
Программы
Работа с приложениями
Разработка приложений
Росстат
Тренинги и вебинары
Финансовые
Форматирование
Функции Excel
акции MulTEx
ссылки
статистика