Тема: Как перенести таблицу Excel в Word
Добрый день подскажите,
как правильно перенести таблицу Excel в Word, чтоб можно было в дальнейшем корретировать её.
Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Добрый день подскажите,
как правильно перенести таблицу Excel в Word, чтоб можно было в дальнейшем корретировать её.
корректировать в Excel ее собираетесь??? или в Word???
Скопируйте диапазон в Excel, перейдите в Word и вставьте его через специальную вставку, выбрав опцию "Связать". Изменения в таблице Excel будут отражаться в таблице, вставленной в Word
В моей любимой книге “Word 2003/2007. Народные советы” на стр.152 написано:
Как вставить таблицу Excel в документ
Этот способ может пригодиться тем пользователям, которые периодически используют в своих документах широкоформатные таблицы, созданные в программе Microsoft Excel.
К сожалению, обычный способ копирования таблицы из Excel и вставки ее в документ Word имеет существенные недостатки. Самые очевидные — по ширине таблица выходит за пределы страницы, а ее формат (шрифт, интервал) отличается от используемого формата документа.
Однако можно избавиться от этих недостатков, если вставить таблицу в документ как графический объект.
В редакторе Word 2003
1. В меню Вставка выберите команду Объект. Откроется диалоговое окно Вставка объекта.
2. Перейдите на вкладку Создание из файла.
3. Нажмите кнопку Обзор, чтобы найти и выбрать файл таблицы Excel. После того как в поле Имя файла появится строка местоположения найденного файла, нажмите кнопку ОК.
Таблица будет вставлена в документ как рисунок. Вы можете изменять его размеры, перемещать и выполнять иные действия. Если дважды щелкнуть мышью по рисунку таблицы, то вы сможете отредактировать исходные данные вашей таблицы прямо в документе Word. При этом окно редактора изменится и примет вид программы Excel. После редактирования исходных данных щелкните указателем мыши за пределами таблицы, чтобы вернуться в режим редактирования документа Word.
В редакторе Word 2007
1. Перейдите на вкладку ленты Вставка.
2. В группе команд Текст нажмите кнопку Вставить объект. Откроется диалоговое окно Вставка объекта.
3. Нажмите кнопку Обзор, чтобы найти и выбрать файл таблицы Excel. После того как в поле Имя файла появится строка местоположения найденного файла, нажмите кнопку ОК.
Спасибо за ответы !!!!
Здорово всё получилось!!!!!!!!
Спасибо!!!!!!
Отредактировано Вулк (04.06.2010 12:51:15)
Подскажите, как можно в Excel или в Wordе при вводе числа получить значение данного числа прописью
Например: 45 - сорок пять и т.д.
С уважением Владимир.
Читайте на сайте (и пользуйтесь поиском): Число или сумма прописью.
а можно использовать и макросы других авторов (найдено в инете, в открытом доступе, насколько я помню на VBstreet):
Sub SummaString(Summa$, source As Long, Rod%, w1$, w2to4$, w5to10$)
'
' "Сумма прописью":
' преобразование числа из цифрого вида в символьное
' ==================================================
' Исходные данные:
' Source - число от 0 до 2147483647 (2^31-1)
' Eсли нужно оперировать с числами > 2 147 483 647
' замените описание переменных Source и TempValue на "AS DOUBLE"
'
' далее нужно задать информацию о единице изменения
' Rod% = 1 - мужской, = 2 - женский, = 3 - средний
' название единицы изменения:
' w1$ - именительный падеж единственное число (= 1)
' w2to4$ - родительный падеж единственное число (= 2-4)
' w5to10$ - родительный падеж множественное число ( = 5-10)
'
' Rod% должен быть задано обязательно, название единицы может быть
' не задано = ""
' ———————————————-
' Результат: Summa$ - запись прописью
'
'================================
Dim TempValue As Long
'
If source& = 0 Then
Summa$ = RTrim$("ноль " + w5to10$): Exit Sub
End If
'
TempValue = source: Summa$ = ""
' единицы
Call SummaStringThree(Summa$, TempValue, Rod%, w1$, w2to4$, w5to10$)
If TempValue = 0 Then Exit Sub
' тысячи
Call SummaStringThree(Summa$, TempValue, 2, "тысяча", "тысячи", "тысяч")
If TempValue = 0 Then Exit Sub
' миллионы
Call SummaStringThree(Summa$, TempValue, 1, "миллион", "миллиона", "миллионов")
If TempValue = 0 Then Exit Sub
' миллиардов
Call SummaStringThree(Summa$, TempValue, 1, "миллиард", "миллиарда", "миллиардов")
If TempValue = 0 Then Exit Sub
'
' Eсли нужно оперировать с числами > 2 147 483 647
' измените тип переменных (см. выше) и добавьте эту строку для триллионов:
' CALL SummaStringThree(Summa$, TempValue#, 1, "трилллион", "триллиона", "триллионов")
' IF TempValue# = 0 THEN EXIT SUB
'
' Что идет после триллионов, я плохо представляю...
'
End Sub
Sub SummaStringThree(Summa$, TempValue As Long, Rod%, w1$, w2to4$, w5to10$)
'
' Формирования строки для трехзначного числа:
' (последний трех знаков TempValue
' Eсли нужно оперировать с числами > 2 147 483 647
' замените в описании на TempValue AS DOUBLE
'====================================
Dim Rest%, Rest1%, EndWord$, s1$, s10$, s100$
'
Rest% = TempValue& Mod 1000
TempValue& = TempValue& \ 1000
If Rest% = 0 Then ' последние три знака нулевые
If Summa$ = "" Then Summa$ = w5to10$ + " "
Exit Sub
End If
'
' начинаем подсчет с Rest
EndWord$ = w5to10$
' сотни
Select Case Rest% \ 100
Case 0: s100$ = ""
Case 1: s100$ = "сто "
Case 2: s100$ = "двести "
Case 3: s100$ = "триста "
Case 4: s100$ = "четыреста "
Case 5: s100$ = "пятьсот "
Case 6: s100$ = "шестьсот "
Case 7: s100$ = "семьсот "
Case 8: s100$ = "восемьсот "
Case 9: s100$ = "девятьсот "
End Select
'
' десятки
Rest% = Rest% Mod 100: Rest1% = Rest% \ 10
s1$ = ""
Select Case Rest1%
Case 0: s10$ = ""
Case 1 ' особый случай
Select Case Rest%
Case 10: s10$ = "десять "
Case 11: s10$ = "одиннадцать "
Case 12: s10$ = "двенадцать "
Case 13: s10$ = "тринадцать "
Case 14: s10$ = "четырнадцать "
Case 15: s10$ = "пятнадцать "
Case 16: s10$ = "шестнадцать "
Case 17: s10$ = "семнадцать "
Case 18: s10$ = "восемнадцать "
Case 19: s10$ = "девятнадцать "
End Select
Case 2: s10$ = "двадцать "
Case 3: s10$ = "тридцать "
Case 4: s10$ = "сорок "
Case 5: s10$ = "пятьдесят "
Case 6: s10$ = "шестьдесят "
Case 7: s10$ = "семьдесят "
Case 8: s10$ = "восемьдесят "
Case 9: s10$ = "девяносто "
End Select
'
If Rest1% <> 1 Then ' единицы
Select Case Rest% Mod 10
Case 1
Select Case Rod%
Case 1: s1$ = "один "
Case 2: s1$ = "одна "
Case 3: s1$ = "одно "
End Select
EndWord$ = w1$
Case 2
If Rod% = 2 Then s1$ = "две " Else s1$ = "два "
EndWord$ = w2to4$
Case 3: s1$ = "три ": EndWord$ = w2to4$
Case 4: s1$ = "четыре ": EndWord$ = w2to4$
Case 5: s1$ = "пять "
Case 6: s1$ = "шесть "
Case 7: s1$ = "семь "
Case 8: s1$ = "восемь "
Case 9: s1$ = "девять "
End Select
End If
'
' сборка строки
Summa$ = RTrim$(RTrim$(s100$ + s10$ + s1$ + EndWord$) + " " + Summa$)
End Sub
Ну а это для теста приведенных выше процедур
Sub tttttest()
Dim source As Long
Dim Summa As String
source = 2010
Call SummaString(Summa, source, 1, "", "", "")
Mid$(Summa$, 1) = Chr$(Asc(Summa$) - 32)
MsgBox Summa
End Sub
В моей любимой книге “Word 2003/2007. Народные советы” на стр.152 написано:
Как вставить таблицу Excel в документ
Доброго времени суток, народ!
А кто-нибудь может посоветовать, как вставить таблицу из Excel в Word 2010/2012?
Буду премного благодарен!
benoni пишет:В моей любимой книге “Word 2003/2007. Народные советы” на стр.152 написано:
Как вставить таблицу Excel в документДоброго времени суток, народ!
А кто-нибудь может посоветовать, как вставить таблицу из Excel в Word 2010/2012?Буду премного благодарен!
Вы имеете в виду Word 2013?
Так же, как и для версии 2007:
В редакторе Word 2007
1. Перейдите на вкладку ленты Вставка.
2. В группе команд Текст нажмите кнопку Вставить объект. Откроется диалоговое окно Вставка объекта.
3. Нажмите кнопку Обзор, чтобы найти и выбрать файл таблицы Excel. После того как в поле Имя файла появится строка местоположения найденного файла, нажмите кнопку ОК.
Вы имеете в виду Word 2013?
Так же, как и для версии 2007:В редакторе Word 2007
1. Перейдите на вкладку ленты Вставка.
2. В группе команд Текст нажмите кнопку Вставить объект. Откроется диалоговое окно Вставка объекта.
3. Нажмите кнопку Обзор, чтобы найти и выбрать файл таблицы Excel. После того как в поле Имя файла появится строка местоположения найденного файла, нажмите кнопку ОК.
Премного благодарен!
Но, как говорил герой одного фильма, или я дурак, или лыжи не едут....
ей-Богу, получается вот такая ерунда:
вы лучше выложите образец ексель файла, который надо преобразовать в ворд
например , ыв вставили ексель в ворд
--вам нужна вставка как фиксированное состояние на час ХХ
--или должны осслеживаться изменения , производимые в екселе в будущем
Alex_Gur пишет:Вы имеете в виду Word 2013?
Так же, как и для версии 2007:В редакторе Word 2007
1. Перейдите на вкладку ленты Вставка.
2. В группе команд Текст нажмите кнопку Вставить объект. Откроется диалоговое окно Вставка объекта.
3. Нажмите кнопку Обзор, чтобы найти и выбрать файл таблицы Excel. После того как в поле Имя файла появится строка местоположения найденного файла, нажмите кнопку ОК.Премного благодарен!
Но, как говорил герой одного фильма, или я дурак, или лыжи не едут....
ей-Богу, получается вот такая ерунда:
Это что, такие мелкие символы получаются? Сколько раз копировал из Excel в Word, но никогда раньше у меня такого не было.
Выложите, пожалуйста, файл Excel.
Нужно ли Вам, чтобы файл Word изменялся вслед за изменением файла Ecxel? Это будет сложнее.
Какую я интересную тему нашел!
Как раз то, что мне крайне важно в настоящий момент.
Вопрос:
Что бы создать простую таблицу с предположим тремя ячейками A, B, C.
Ячейки A,B заполняются от руки, а в ячейке С должна выходить "сумма A+B"
надо действительно брать Exell и вставлять такую таблицу как объект или
можно написать макрос и нажимать на выбранное сочетание клавиш
или есть внутренние возможности Word2003?
Я подозреваю что есть раз существует тема в блоге http://wordexpert.ru/page/makros-podsch … v-tablitse.
Подскажите с чего начать в этом случае, так как вычисления не планируются сложные и будут всегда ограничены максимум 8 ячейками, а минимум тремя вышеуказанными.
Увидев призрачную надежду решить ещё одну из проблем облегчить нудный набор текста спешу выложить иллюстрацию к написанному выше.
В примере та самая таблица. Действующих ячеек три. Простое сложение ничего больше.
Пока не лез в Exell, там знаю решается просто Указываешь в третьей ячейке С формулу - "знак суммы и координаты ячеек А и В".
Вопрос 1 Работает ли такой принцип в Word? Ну судя по ранее написанному Да.
Вопрос 2 Как правильно указать координаты ячеек. Ну вероятнее всего как в Exell строка 1 ячейка A строка 2 ячейка B. А объединённая ячейка вероятнее всего будет "строка 3 единственная ячейка А"
А формулу из чего взять - вероятнее всего тупо открыть Exell и переписать от туда?
К сожалению я "механический программист" так что прошу отнестись к этим рассуждением снисходительно.
Vank Про использование формул в таблицах Word неплохие статьи можно прочитать здесь:
внешняя ссылка
внешняя ссылка
На wordexpert можно посмотреть здесь:
http://wordexpert.ru/page/kak-vklyuchit … -tablitsyi
http://wordexpert.ru/page/table-word2
http://wordexpert.ru/page/table-autosumma
Vank Про использование формул в таблицах Word неплохие статьи можно прочитать здесь:
Пришел майор Boris_R притащил 3 удочки и 2 спининга...
Спасибо большое, потому, что когда нет уверенности, что цель достижима, да ещё и искать не знаешь где...будем искать.
Сокровенные знания полученные от Boris_R не удержавшись использованы сразу с потрясающем успехом. Что характерно всё великолепно работает ан W2003 Exell абсолютно не нужен и есть ощущение что ты Венец творения! Короче ура! Пример снизу
К несчастью, радость моя была преждевременной!
Я воспользовался советом из этого раздела http://wordexpert.ru/page/table-word2
Всё вроде встало (таблицу выбрал простейшую в 4 клетки) по-началу и в конце защитил форму.
Проблема: формулу А1+В1 не вычисляет при повторном введении показателей. Так и остается сумма выставленная в начале. Если снять защиту, просто открыть свойство поля ничего не менять, просто закрыть, то поле обновляется до нового результата.
В чем проблема?
Кто знает гляньте!
Ну, на самом деле я посчитал, что поля при внесении в них информации будут так же как в Excel вести, напишешь и само собой суммируется. Я даже начал вопросы писать, на самом деле это не так и вероятнее всего и не могло быть иначе. Во внешних ссылках от Boris_R как раз и содержится подробная информация как обзываются поля и как обновлять из и с какой стороны они выполняют простейшие действия. Пока нет времени, но займусь обязательно...
Несказанную радость доставил результат осознанного прочтения этой ссылки http://wordexpert.ru/page/table-word2
Правда "прямой путь не всегда самый короткий", так и у меня получилось. Серия вопросов возникла после первого прочтения а какие формулы бывают, а как при вставке "поле" выбрать числовое значение там их много всяких и главное - ошибка я не понял сразу, "Формула" ищется в совсем другом меню "Таблица"на основной панели, а не на панели таблица...
Распечатка и изучение внешних ссылок с сайта MS прояснила многое даже такому "механическому" программисту как я и в результате между строк "Народных советов" засияло Сокровенное знание!
Дай Бог удачи этому замечательному человеку и тем неравнодушным людям, которые пришли и поддерживают огонь в его сайте.
Тут надо прослезиться!
Короче. В чём смысл сказанного вариант с защищённой формой самый и самый подходящий.
Думать и размышлять в каком формате писать цифру и на какую клавишу нажимать - обновлять поле явно не для нас истинных ценителей Word.
Всё должно вписываться без вариантов, быть защищено и считать само!
И главное - без привлечения всяких там Excellей!
В результате вышла обновлённая таблица имени Boris_R, а у меня повод гордиться
этим маленьким успехом!
Ура короче.
Да, "если ситуация улучшается, значит вы чего-то не заметили"!
Фигня вышла...
Чуяло моё сердце. Ещё по шапочному знакомству с Acces помню что образование "Форма" это крайне негибкая структура предназначенная для того, что бы чужие шаловливые ручки ничего не испортили кривым введением данных.
Когда я поместил свою таблицу в документ и нажал "защитить форму" вдруг все кнопочки на собственных панелях и даже о ужас на основной панели вдруг стали белёсыми и перестали нажиматься, более того в соседней табличке стало так же невозможно вводить данные - ведь там я никаких полей не назначал и всё благолепие накрылось!
Видимо без волшебной клавиши F9 не обойтись, а может и без Exellя будь он неладен...
Нету в жизни счастья.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться