Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/перенос в текст Word значений из Excel без самой ячейки - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Word » перенос в текст Word значений из Excel без самой ячейки (Формулы/Formulas)
перенос в текст Word значений из Excel без самой ячейки
Стас86 Дата: Четверг, 10.11.2016, 01:25 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003
Здравствуйте. Есть такая потребность: в документе, в тексте (не в таблице) встречаются цифры взаимосвязанные определенными простыми формулами (на уровне +,-,х,/). Нужно брать одно значение из текста, пропускать его через заданную формулу и выводить ответ в другое место текста.
Как вы могли догадаться по вопросу с макросами, к сожалению, я не дружен.
Вариант связки с Excelем пробовал, только через вставку ячеек в текст, но не устраивает, что из-за ячеек съезжает текст - получается довольно криво. Может можно как-то сделать более красиво через Excel или еще как-то.

Например: Годовой расход составил 4 м3/год, что соответствует 2т/год. Где 2 и 4 связаны через формулу 4/2=2

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

нашел такой макрос
[vba]
Код
Sub FillingWordFile()
Dim WD
Dim XL As Excel.Application
Set WD = CreateObject("Word.Application")
WD.Visible = True
WD.Documents.Open Filename:=Application.ThisWorkbook.Path & "\название файла.doc"

Range("адрес ячейки").Copy
WD.ActiveDocument.Bookmarks.Item("название закладки").Range.Paste

End Sub
[/vba]

почти то что надо, но он вставляет ячейку, и к тому же в нее запихивается весь абзац до закладки, а мне надо, чтоб вставлялось только значение без ячейки. Может кто-то научить как это правильно реализовать?

Спасибо, за ответы и за дельные советы. Очень жду.


Сообщение отредактировал Стас86 - Четверг, 10.11.2016, 01:27
 
Ответить
СообщениеЗдравствуйте. Есть такая потребность: в документе, в тексте (не в таблице) встречаются цифры взаимосвязанные определенными простыми формулами (на уровне +,-,х,/). Нужно брать одно значение из текста, пропускать его через заданную формулу и выводить ответ в другое место текста.
Как вы могли догадаться по вопросу с макросами, к сожалению, я не дружен.
Вариант связки с Excelем пробовал, только через вставку ячеек в текст, но не устраивает, что из-за ячеек съезжает текст - получается довольно криво. Может можно как-то сделать более красиво через Excel или еще как-то.

Например: Годовой расход составил 4 м3/год, что соответствует 2т/год. Где 2 и 4 связаны через формулу 4/2=2

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

нашел такой макрос
[vba]
Код
Sub FillingWordFile()
Dim WD
Dim XL As Excel.Application
Set WD = CreateObject("Word.Application")
WD.Visible = True
WD.Documents.Open Filename:=Application.ThisWorkbook.Path & "\название файла.doc"

Range("адрес ячейки").Copy
WD.ActiveDocument.Bookmarks.Item("название закладки").Range.Paste

End Sub
[/vba]

почти то что надо, но он вставляет ячейку, и к тому же в нее запихивается весь абзац до закладки, а мне надо, чтоб вставлялось только значение без ячейки. Может кто-то научить как это правильно реализовать?

Спасибо, за ответы и за дельные советы. Очень жду.

Автор - Стас86
Дата добавления - 10.11.2016 в 01:25
Pelena Дата: Четверг, 10.11.2016, 08:44 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 9842
Репутация: 2252 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
Здравствуйте.
Если формулы простые, то, возможно, Excel и не нужен.
Прежде всего включите в Параметрах Word режим отображения закладок и параметр Затенение полей установите Всегда.
Дальше выделите текст с исходным числом и создайте закладку (Вставка -- закладка), вокруг текста должны появиться квадратные скобки (на печать не выводятся). В Вашем примере выделяем 4 и создаём закладку с именем, например, расход.
На месте будущей формулы вставляем поле Вставка -- Поле -- Формула и пишем формулу =расход/2.
При изменении исходного значения важно не удалить закладку, поэтому рекомендуется сначала ввести новое значение, а затем удалить старое. Для обновления результата правой кнопкой мыши по полю с формулой -- Обновить поле или выделить и нажать F9. Если таких полей в документе много, можно выделить весь текст и нажать F9. Автоматически поля обновляются перед печатью.
К сообщению приложен файл: Word.doc(22Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Если формулы простые, то, возможно, Excel и не нужен.
Прежде всего включите в Параметрах Word режим отображения закладок и параметр Затенение полей установите Всегда.
Дальше выделите текст с исходным числом и создайте закладку (Вставка -- закладка), вокруг текста должны появиться квадратные скобки (на печать не выводятся). В Вашем примере выделяем 4 и создаём закладку с именем, например, расход.
На месте будущей формулы вставляем поле Вставка -- Поле -- Формула и пишем формулу =расход/2.
При изменении исходного значения важно не удалить закладку, поэтому рекомендуется сначала ввести новое значение, а затем удалить старое. Для обновления результата правой кнопкой мыши по полю с формулой -- Обновить поле или выделить и нажать F9. Если таких полей в документе много, можно выделить весь текст и нажать F9. Автоматически поля обновляются перед печатью.

Автор - Pelena
Дата добавления - 10.11.2016 в 08:44
Стас86 Дата: Четверг, 10.11.2016, 10:13 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

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

Автор - Стас86
Дата добавления - 10.11.2016 в 10:13
Стас86 Дата: Четверг, 10.11.2016, 12:31 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2003
Прежде всего включите в Параметрах Word режим отображения закладок и параметр Затенение полей установите Всегда.
Дальше выделите текст с исходным числом и создайте закладку (Вставка -- закладка), вокруг текста должны появиться квадратные скобки (на печать не выводятся). В Вашем примере выделяем 4 и создаём закладку с именем, например, расход.
На месте будущей формулы вставляем поле Вставка -- Поле -- Формула и пишем формулу =расход/2


Так и есть - это оно - все, что надо в формуле можно прописать (боялся, что округления не будет, и даже степени есть).
Этот вариант, пожалуй, самый простой и подходящий для моей задачи. Хорошо быть знающим. :)
Спасибо Вам огромное.
 
Ответить
Сообщение
Прежде всего включите в Параметрах Word режим отображения закладок и параметр Затенение полей установите Всегда.
Дальше выделите текст с исходным числом и создайте закладку (Вставка -- закладка), вокруг текста должны появиться квадратные скобки (на печать не выводятся). В Вашем примере выделяем 4 и создаём закладку с именем, например, расход.
На месте будущей формулы вставляем поле Вставка -- Поле -- Формула и пишем формулу =расход/2


Так и есть - это оно - все, что надо в формуле можно прописать (боялся, что округления не будет, и даже степени есть).
Этот вариант, пожалуй, самый простой и подходящий для моей задачи. Хорошо быть знающим. :)
Спасибо Вам огромное.

Автор - Стас86
Дата добавления - 10.11.2016 в 12:31
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Word » перенос в текст Word значений из Excel без самой ячейки (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!