Использование таблиц – это удобный способ представления данных, будь то важный отчет крупной компании или рядовое резюме соискателя работы. Таблицы в текстовом редакторе Word представляют собой набор ячеек, расположенных в вертикальных и горизонтальных колонках.
Таблицы могут быть созданы в Word простым использованием ленточного меню пункта «Вставка» — «Таблица» — «Вставить таблицу». В той же области есть возможность вставить так называемую экспресс-таблицу, используя готовые образцы. Кроме того, превратить в таблицу можно выделенный текст или просто вручную нарисовать таблицу. После создания таблицы есть возможность выделять как отдельные ячейки, так и колонки строк или столбцов.
Онлайн-курс «Word от простого к сложному»Онлайн-курс «Word от простого к сложному»Освойте работу в главном текстовом редакторе на высоком уровне. Неважно новичок вы или уже работаете с Word, с нашим курсом вы станете настоящим гуру документов!Подробнее
Простая вставка таблицы
Из ленточного меню выберите пункт «Вставка», область «Таблицы». Нажмите на стрелочку под кнопкой «Таблица».
Из выпадающего списка выделением отметьте желаемое количество строк и столбцов в таблице. В процессе выделения, в вашем документе появится превью макета. Чтобы вставить тот или иной вариант таблицы просто нажмите левой клавишей мыши в крайней выбранной вами ячейке.
Кликнув на любую из ячеек в созданной таблице, в ленточном меню добавится пункт «Конструктор», в котором можно удобно поменять дизайн таблицы, выбрав тот или иной стиль оформления, а также задать те или иные значения в области «Параметры стилей таблиц», например, добавить или удалить строку заголовка и строку итогов.
Кроме того, используя контекстное меню по нажатию правой клавиши мыши в области таблицы, можно выбрать пункт «Свойства таблицы» и в открывшемся окне отрегулировать те или иные значения. Установив же курсор в любую из ячеек, можно набирать в ней текст или цифры.
Объединение ячеек
Если вам необходимо объединить несколько ячеек в одну, например, в строке заголовка, то выделите соответствующие ячейки, используя мышь. В ленточном меню выберите пункт «Макет» и в области «Объединение» выберите опцию «Объединить ячейки».
В этой же области можно также разделять ранее объединенные ячейки, а при желании можно разделить одну таблицу на несколько составляющих.
Выделение таблицы
Если вы хотите выделить всю таблицу, например, для ее копирования, перемещения или удаления, то поместить курсор в любую из ячеек, а из ленточного меню в пункте «Макет» в области «Таблица» нажмите кнопку «Выделить» и из выпадающего списка значение «Выделить таблицу». Аналогичным образом можно выделить ячейку, строку или столбец.
Более простой способ для выделения всей таблицы целиком – это нажать на специальную пиктограмму в правом верхнем углу над таблицей. Эта пиктограмма в виде четырех стрелок в разные стороны появляется при простом наведении курсора на таблицу, а также отображается всегда при работе с элементами таблицы.
Для выделения строки в таблице можно также использовать только курсор мыши – поместите его слева напротив строки для выделения. Стрелка курсора развернется вправо, после чего просто кликнете левой клавишей мыши. Для выделения столбца – поместите курсор мыши на границу верхней ячейки желаемого столбца – курсор должен принять вид черной стрелочки, повернутой вниз, после чего кликните мышью.
Превращаем текст в таблицу
Текстовый редактор Word позволяет преобразовывать готовый текст в таблицу. Для этого соответствующее содержимое должно быть разделено между собой табуляцией, либо символом точка с запятой (;).
Просто выделите набранный текст, в ленточном меню в пункте «Вставка» из области «Таблицы» кликните на кнопку «Таблица» и выберите значение «Преобразовать в таблицу».
В открывшемся диалоговом меню убедитесь, что количество столбцов и строк соответствует выбранной области, при необходимости отрегулируйте значения. В этом же окне в области «Разделитель» убедитесь, что выбранное значение соответствует вашему примеру (если отделяли точками с запятой, то и здесь должен быть отмечен аналогичный пункт). После чего нажмите Ок.
Добавление строк и столбцов
Чтобы добавить новую строку в существующую таблицу, поместите курсор мыши по левому краю таблицы между теми строками, где необходимо добавить новую. Должен отобразиться круглый элемент со знаком плюсика, а граница между двумя строками будет выделена. По нажатию на знак с плюсиком в выбранном месте добавится пустая строка.
Аналогичным образом можно вставлять и новые столбцы, помещая курсор мыши в области над таблицей между конкретными столбцами. Должен появиться аналогичный элемент с плюсиком.
Кроме того, добавлять строки и столбцы в таблицу можно через ленточное меню в пункте «Макет» в области «Строки и столбцы». Либо же используя контекстное меню и пункт «Вставить» с выбором конкретного значения – что и куда.
Изменение границ и цвета
Если выбранный ранее стиль таблицы нас не совсем устраивает, мы можем вернуться в уже знакомую нам область ленточного меню «Конструктор». Здесь в области «Обрамление» можно изменить стиль краев как по контуру, так и внутри таблицы между ячейками. Используя элемент «Раскраска границ» можно дополнительно указать ширину и цвет для последующей раскраски, а в дальнейшем вручную изменить внешний вид краев там, где это требуется.
Наконец, если вы хотите изменить цвет ячеек, то в том же пункте ленточного меню «Конструктор» нажимаем на кнопку «Заливка» и выбираем конкретный цвет, которым должны быть заполнены выделенные ячейки.
Microsoft Word позволяет применять форматирование к большим фрагментам текста. Вы можете скопировать форматирование, примененное к одному биту текста, и применить его ко всем абзацам и разделам всего за несколько щелчков мышью. К сожалению, это не относится к таблицам. Если вы хотите изменить стиль для всех таблиц в конкретном документе, вам придется выбрать каждую из них отдельно и изменить стиль. Альтернативой является использование макроса для этого.
Найти стиль таблицы
Прежде чем вы сможете создать макрос, вам нужно найти имя стиля таблицы, который вы хотите применить. Это довольно просто. Откройте документ Word, для которого вы хотите изменить стили таблицы. Щелкните внутри таблицы и перейдите на вкладку «Дизайн» на вкладке «Работа с таблицами».
Наведите курсор мыши на стиль таблицы, который вы хотите применить ко всем таблицам, и всплывающая подсказка сообщит вам, как он называется. Запишите имя, и вы готовы создать макрос.
Макрос стиля таблицы
Включите вкладку «Разработчик» в Word, выбрав «Файл»> «Параметры»> «Настроить ленту». Включите панель инструментов разработчика, а затем вернитесь к своему документу.
На вкладке Разработчик щелкните Макросы. Дайте ему следующее имя;
ApplyTableStyle
Нажмите «Создать» и введите следующее в поле кода, однако вам необходимо отредактировать эту строку: tbl.Style = «Среднее затенение 2 — Акцент 1». Замените бит внутри кавычек именем стиля таблицы, который вы скопировали на предыдущем шаге. Не удаляйте кавычки из кода. Просто введите имя стиля таблицы и запустите его.
Sub ApplyTableStyle() Dim tbl As Table For Each tbl In ActiveDocument.Tables tbl.Style = "Medium Shading 2 - Accent 1" Next End Sub
Это все, что вам нужно сделать. После запуска макрос автоматически изменит стиль для всех таблиц. Если вам когда-либо понадобится использовать другой стиль таблицы, вам нужно будет удалить этот макрос, потому что он заранее изменяет стиль всех таблиц на тот, который вы указали в макросе.
Если вам когда-нибудь понадобится изменить стиль, к которому применяется макрос, вам нужно будет отредактировать код и заменить имя стиля, который вы хотите применить. Макрос применяет стили ко всем текущим и всем новым таблицам в документе. Очевидно, это было бы проще, если бы в Microsoft Word была встроенная опция для этого. Это кажется странным недостатком для приложения.
Бытует мнение, что таблицы Microsoft Word — самая неприятная часть текстового редактора. Они неуклюжи, ими трудно управлять, их тяжело форматировать. После прочтения этой статьи у вас не останется таких предубеждений.
Предвзятое отношение к таблицам имеет свои глубокие корни. Чего греха таить, дюжину лет назад таблицы в Word не могли похвастаться удобством из-за несовершенства программы в целом. Но с тех пор прошло много времени. Microsoft прекрасно поработала над своими ошибками и сделала всё возможное для удобства пользователей. Жаль, конечно, что многие из тех самых пользователей об этом не знают и до сих пор работают в 2003-й редакции офисного пакета. Историю про ёжиков и кактусы не напоминает? 
Всем застрявшим в прошлом просто по-человечески рекомендую обновиться как минимум до 2013-й версии Microsoft Office, а лучше — сразу до свежей, 2016-й. Поверьте, вам только кажется, что вы работаете в ставшей классикой среде, на самом деле она уже давно поросла мхом и плесенью.
Используйте шаблоны
Офисные будни полны однообразных документов, в том числе и таблиц. Берём одну электронную бумажку, вырезаем её часть, вставляем в новый документ и правим детали. Хорошая методика, но, как мне кажется, работа с шаблонами немного проще и быстрее. К слову, в самом Word шаблоны величают экспресс-таблицами.
Кликните по закладке «Вставка», щёлкните по «Таблице» и перейдите к «Экспресс-таблицам». Обратите внимание на пункт «Сохранить выделенный фрагмент в коллекцию».
Здесь вы найдёте несколько вполне полезных вариантов и, что самое главное, сможете сохранить в качестве шаблона любую другую таблицу или её фрагмент, в том числе и собственного производства.
Рисуйте таблицы
Помните медведя, который в детстве прошёлся по вашим ушам и рукам в безудержном цыганском танце? Именно с тех пор вы не любите пение и кисточки и именно с тех пор вы упорно игнорируете опцию «Нарисовать таблицу» в Word. Встряхнись, взрослый человек! Пора подавить мохнатое чудовище! Это проще, чем кажется.
Кликните по закладке «Вставка», щёлкните по «Таблице» и перейдите к пункту «Нарисовать таблицу».
И не бойтесь совершить промах: под рукой всегда найдётся ластик. Порой карандаш и стиралка существенно упрощают создание сложных таблиц с мелкими элементами.
Вставляйте строки и столбцы быстро
Начиная с Word 2013 добавление строк и столбцов из зубодробительной пытки превратилось в увлекательную забаву. Не подумайте, архаичные «Вставить столбцы слева/справа» и «Вставить строки сверху/снизу» никуда не делись, но о них теперь можно забыть.
Наведите курсор на пространство между строками или столбцами за пределами таблицы и нажмите на появившийся плюс.
В будущем хотелось бы видеть что-то похожее и для функции удаления.
Применяйте линейку
У каждого человека есть любимые и отталкивающие цифры, которые он без разбору использует или избегает в своей жизни. Даже в параметрах своих таблиц. Знаю таких.
Если вы привыкли точно выставлять значения отступов, ширину и высоту ячеек через свойства таблицы, попробуйте альтернативу — линейку.
Наведите курсор на границу столбцов или строк, схватите её, зажмите клавишу Alt и пользуйтесь удобством сантиметровой линейки.
Такой же трюк можно провернуть и с маркерами отступов и выступов. Наведите на них курсор и зажмите всё ту же клавишу Alt.
Используйте горячие клавиши
Будь я разработчиком программного обеспечения, я бы нарёк горячие клавиши душевными кнопками. Ведь порой так и хочется обняться с ноутбуком только потому, что они есть. Что же касается таблиц Word, я наиболее часто использую тройку комбинаций:
- Alt + Shift + «Вверх/Вниз» быстро перемещает текущую строку на одну позицию выше или ниже (просто незаменимая вещь).
- Ctrl + Shift + A мгновенно превращает прописные буквы в заглавные, что очень полезно для заголовков.
- Ctrl + Tab добавляет табуляцию в ячейке, в то время как обычный Tab переносит курсор на следующую ячейку.
Преобразуйте текст в таблицу
Немного магии, которой можно прихвастнуть на глазах у изумлённой публики. Вместо того чтобы создавать таблицы привычным способом, попробуйте парочку других, более изощрённых, вариантов:
- Массивы ячеек, скопированные из Excel, вставляютcя в Word как таблица с невидимыми границами.
- Хорошо структурированный текст легко преобразуется в таблицу штатными средствами Word.
Выделите текст, кликните по закладке «Вставка», щёлкните по «Таблице» и выберите пункт «Преобразовать в таблицу».
Обратите внимание на вспомогательные параметры: качество преобразования зависит от них напрямую.
Контролируйте размеры ячеек
Хочешь узнать человека, подкинь ему таблицу с текстом-самодуром. Немного свободная интерпретация известного мнения, конечно, но бьёт в точку. Только взгляните на скриншот, а точнее на первую колонку и слово «филологический» — безобразное бельмо.
По моим наблюдениям, в таких случаях люди сначала неприлично выражаются, а затем прибегают к не самому оптимальному выходу — уменьшают размер шрифта. Но лучше вместить текст другим путём.
Щёлкните в ячейке правой клавишей, выберите пункт «Свойства таблицы», переключитесь на закладку «Ячейка», перейдите к «Параметрам» и проставьте галочку в графе «Вписать текст».
Word поднатужится и вернёт убежавшую букву на место, а в мире снова воцарится мир. К слову, для наглядности «вписанный» текст будет подчёркиваться голубой линией.
А ещё, бывает, позаимствуешь чью-то таблицу и довольно напеваешь себе под нос: «Только ты, рыба моей мечты»! Хорошая работа чужими руками! Начинаешь заливать её своими данными, и тут происходит неконтролируемая чертовщина: одни столбцы расползаются за счёт похудения других. Голова отрезвляется, и реальность перестаёт радовать. Как быть?
Шутки шутками, но случается, что вам присылают таблицу строгого формата, с которой нельзя оплошать. Как минимум не поленитесь отправить её обратно с прежними размерами. Так получатель увидит то, что ожидает увидеть. А для этого отключите автоподбор размеров по содержимому.
Щёлкните в любой из ячеек правой клавишей мыши, выберите пункт «Свойства таблицы», перейдите к «Параметрам» и снимите галочку в графе «Автоподбор размеров по содержимому».
Эта же опция спасёт вашу таблицу от коллапса, если вам необходимо заполнить некоторые ячейки изображениями: они впишутся в виде миниатюры вместо полномасштабного размера.
Есть что добавить? Пишите в комментариях.
Как в Ворде выделить таблицу?
Также статьи о работе с таблицами в Ворде:
Для применения одинаковых параметров форматирования ко всей таблице в Word, ее необходимо полностью выделить, и далее мы рассмотрим, как в Ворде выделить таблицу.
В принципе, вариантов тут немного, а вернее только два, не учитывая применение макросов. Выделить таблицу в Word можно выделив все ячейки таблицы мышкой, либо нажав на крестик в верхнем левом углу, который появляется при наведении курсора на таблицу. При этом сразу появляется вкладка «Работа с таблицами» для настройки таблиц.
Выделение же классическим методом комбинацией клавиш «Ctrl+A» позволяет выделить все, включая таблицы, но при этом вкладка «Работа с таблицами» не появится, так как для этого таблица должна быть активна, т.е. курсор должен быть расположен внутри нее.
Массовое выделение элементов докумена (таблиц, рисунков)
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Сообщений [ 17 ]
1 Тема от 1st 28.02.2011 12:12:19
- 1st
- сержант
- Неактивен
- Зарегистрирован: 04.04.2010
- Сообщений: 10
Тема: Массовое выделение элементов докумена (таблиц, рисунков)
Доброго времени суток!
Имеется документ, элементы которого (таблицы или рисунки) необходимо форматировать определенным образом. Для этого нужно массовое их выделение с последующим применением различных стилей. Пожалуйста помогите с макросами, который позволил бы выделить отдельно рисунки (и отдельно таблицы). Благодарю!
2 Ответ от Ципихович Эндрю 28.02.2011 17:42:47
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Массовое выделение элементов докумена (таблиц, рисунков)
если надо несколько таблиц сразу надо узнать начало первой и конец второй и выделить, не смежные части в доке выделить никак
Выделять как таблицы
Отредактировано Ципихович Эндрю (28.02.2011 17:43:49)
3 Ответ от ЮВ 28.02.2011 18:28:06
- ЮВ
- генерал-лейтенант
- Неактивен
- Зарегистрирован: 28.07.2010
- Сообщений: 284
- Поблагодарили: 43
- За сообщение: 1
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Я не программирую на VBA, поэтому предложение может оказаться неверным.
Подсчитать кол-во таблиц в документе
CountTab=ActiveDocument.Tables.Count
и потом в цикле их выделить
for i=1 to CountTab
ActiveDocument.Tables(i).Select
end
4 Ответ от Ципихович Эндрю 28.02.2011 21:26:56
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Массовое выделение элементов докумена (таблиц, рисунков)
да всё верно, смотря что автору нужно
5 Ответ от 1st 01.03.2011 10:31:25
- 1st
- сержант
- Неактивен
- Зарегистрирован: 04.04.2010
- Сообщений: 10
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Я не программирую на VBA, поэтому предложение может оказаться неверным.
Подсчитать кол-во таблиц в документе
CountTab=ActiveDocument.Tables.Count
и потом в цикле их выделить
for i=1 to CountTab
ActiveDocument.Tables(i).Select
end
В данном случае выделяется таблицы друг за другом, но выделенная остается только полседняя!
Я думал, что можно одним макросом выделить все таблицы (т.е. это как при нажатом ctrl выделяю мышью таблицы в документе) и отформатировать их по своему усмотрению.
Отредактировано 1st (01.03.2011 19:27:36)
6 Ответ от ЮВ 01.03.2011 13:28:05
- ЮВ
- генерал-лейтенант
- Неактивен
- Зарегистрирован: 28.07.2010
- Сообщений: 284
- Поблагодарили: 43
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Я думал, что можно одним макросом выделить все таблицы (т.е. при нажатом ctrl выделяю мышью таблицы в документе) и отформатировать их по своему усмотрению.
Если нажать Ctrl (программно) и запустить макрос — множественное выделение не выполняется?
7 Ответ от Ципихович Эндрю 01.03.2011 19:10:06
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Не парьтесь:
Я думал, что можно одним макросом выделить все таблицы (т.е. при нажатом ctrl выделяю мышью таблицы в документе) и отформатировать их по своему усмотрению.
Макрос это сделает если у Вас не 600-700 таблиц легко просто будет делать циклом или при условии, что эти таблицы идут следом одна за другой всё можно их выделить сразу все
8 Ответ от ЮВ 02.03.2011 22:00:15
- ЮВ
- генерал-лейтенант
- Неактивен
- Зарегистрирован: 28.07.2010
- Сообщений: 284
- Поблагодарили: 43
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Честно говоря, так и не понял — проблема решена или нет?
9 Ответ от Вождь 03.03.2011 06:01:59
- Вождь
- Модератор
- Неактивен
- Зарегистрирован: 07.01.2010
- Сообщений: 745
- Поблагодарили: 181
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Если изначально таблицы одного стиля, то делаем так:
Рисунки «в тексте» (InLineShapes) выбрать можно только по одному, а все рисунки «перед текстом» (Shapes) выделяем так:
Для массовой обработки последних не обязательно их выбирать, можно и так:
10 Ответ от 1st 03.03.2011 08:59:06
- 1st
- сержант
- Неактивен
- Зарегистрирован: 04.04.2010
- Сообщений: 10
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Честно говоря, так и не понял — проблема решена или нет?
Привет всем!
Вопрос актуален! Разбираюсь — читаю литературу по VBA. Может не понятен вопрос?
Имеется документ с множеством таблиц и рисунков. Мне нужно все таблицы в документе выровнять по ширине, текст в таблице по центру и т.д., т.е. применить определенный стиль для всех таблиц в документе. Искать, выделять и применять стиль для каждой? Очень большой документ, более 300 таблиц. Та же проблема и с рисунками.
Отредактировано 1st (03.03.2011 17:25:57)
11 Ответ от admin 04.03.2011 17:34:39
- admin
- Администратор
- Неактивен
- Откуда: Земля
- Зарегистрирован: 15.12.2009
- Сообщений: 508
- Поблагодарили: 39
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Мне нужно все таблицы в документе выровнять по ширине
12 Ответ от Defor 25.10.2011 17:16:18
- Defor
- рядовой
- Неактивен
- Зарегистрирован: 25.10.2011
- Сообщений: 2
Re: Массовое выделение элементов докумена (таблиц, рисунков)
День добрый.
Для меня сейчас актуален подвопрос текущего топика, а именно обработка параметра spacing для таблиц.
Так сложилось, что текст получен из html и все таблицы пришли с нулевым значением интервала между ячейками. На практике это приводит к появлению двойных границ каждой ячейки в таблице. Дабы этого избежать, параметр «Интервал между ячейками» можно отключить вручную. Однако. Таблиц то море.. А в макрос я могу записать только конкретное число большее либо равное нулю..
Есть ли возможность в VBA «снять галочку» с параметра spacing для каждой страницы?
Пример кода приложу, дабы не быть голословным (кусочно из этой темы):
13 Ответ от Defor 26.10.2011 10:58:45
- Defor
- рядовой
- Неактивен
- Зарегистрирован: 25.10.2011
- Сообщений: 2
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Попробовал на чистом документе -> Создал произвольную таблицу (по умолчанию параметр/галочка Интервалы между ячейками отключен) -> Запустил процесс создания макроса -> Сначала активировал интервалы, потом снял.
Автоматический код привожу ниже:
Как видно, единственным отличаем является параметр «Spacing». Однако при выставлении его в 0 = параметр не деактивируется, а выставляется в нулевое значение ==> сдвоенные границы, что визуально сильно «карявит» документ..
14 Ответ от Ципихович Эндрю 26.10.2011 15:54:54
- Ципихович Эндрю
- генерал-полковник
- Неактивен
- Зарегистрирован: 04.02.2010
- Сообщений: 506
- Поблагодарили: 23
Re: Массовое выделение элементов докумена (таблиц, рисунков)
не пойму кинули в документ 1 таблицу
сделали
ActiveDocument.Tables(1).Spacing = 10
вернули
ActiveDocument.Tables(1).Spacing = 0
Всё делается, всё возвращается, а про ту что с нета скачана ничего не знаю, там могут бытьтакие чудеса
15 Ответ от Slamzor 16.03.2013 19:14:40
- Slamzor
- сержант
- Неактивен
- Зарегистрирован: 13.12.2012
- Сообщений: 32
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Рисунки «в тексте» (InLineShapes) выбрать можно только по одному
А как можно такие рисунки отделить и применить к ним форматирование?
Если на примере, то есть в документе такие рисунки: одни крупные к ним идет подпись из названия. Другие мелкие, размещены внутри текста. Нужно крупные рисунки разместить по центру, а мелкие не трогать.
16 Ответ от viter.alex 17.03.2013 01:13:25
- viter.alex
- Модератор
- Неактивен
- Откуда: Харьков, Украина
- Зарегистрирован: 21.12.2009
- Сообщений: 884
- Поблагодарили: 140
- За сообщение: 1
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Можно отобрать, например, по высоте или ширине
17 Ответ от Slamzor 17.03.2013 10:57:37
- Slamzor
- сержант
- Неактивен
- Зарегистрирован: 13.12.2012
- Сообщений: 32
Re: Массовое выделение элементов докумена (таблиц, рисунков)
Спасибо большое!
А как можно тогда с таблицами поступить? Есть в документе два вида таблиц. Первый вид: имеет шапку сбоку, второй шапку сверху. Нужно второй вид вид таблиц изменить: 1) шапку по центру дать 2) Внутри весь текст 12 шрифт задать.
Сообщений [ 17 ]
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Похожие темы
- Выделение только текста (без таблиц и рисунков)
- Выделение и редактирование только текста (без таблиц и рисунков)
- Выделение графических элементов в Word 2010
- Нумерация рисунков и таблиц по ГОСТу
- Обновление номеров страниц, рисунков, таблиц и т.д.
- Отображение рисунков и таблиц в модальном окне
- Автоматическая нумерация формул/таблиц/рисунков
- Сбой перекрестных ссылок на названия рисунков и таблиц
Массовое выделение элементов докумена (таблиц, рисунков)
Если у вам часто приходится работать с различными текстами, писать и обрабатывать их, то, скорей всего, у вас установлен редактор Microsoft Word. На портале о Microsoft Office Word вы узнаете про: код активации установки ms offis 2007. Какая бы версия программы у вас ни стояла, вряд ли вы используете больше двадцати процентов того, что эта программа может. На портале о Microsoft Office Word вы узнаете про: как убрать линию из таблицы в ворде. Если желаете узнать больше о работе в редакторе, то посетите форум Ворд Эксперт. Это русскоязычный сайт с доступным интерфейсом, простой регистрацией и множеством полезнейшей информации. Наш сайт о Microsoft Office Word даст ответ про: что сделать чтоб файл в microsoft word повернулся.
Портал разработан специально для пользователей редактора Microsoft Word. Зарегистрировавшись на портале, вы узнаете много новой и нужной информации, даже если вы давно и часто работаете в приложении. Наш сайт о Microsoft Office Word даст ответ про: ворд непечатные символы. На сайте представлена разнообразная литература и ответы на часто возникающие у пользователей Microsoft Word вопросы. На портале о Microsoft Office Word вы узнаете про: отступ первой строки абзаца гост. Вы легко научитесь оптимизировать свою работу и даже писать макросы. Готовые решения часто возникающих проблем вы можете найти в специальных разделах на сайте. На портале о Microsoft Office Word вы узнаете про: сохранить изменения нет.
При трудностях в работе с редактором или создании макросов вы всегда можете обратиться за помощью к опытным пользователям. На портале о Microsoft Office Word вы узнаете про: активация ворда. Можно задать любой вопрос о настройке, форматировании и автоматизации работы Microsoft Word, найти готовое решение или оставить заявку на написание макроса. На портале о Microsoft Office Word вы узнаете про: как подчеркивать пробелы в word.
Как в ворде выделить все таблицы одновременно
Доброе время суток!
Прошу помочь. Я не программист вообще, но уверенный пользователь. Могу очень уверенно переписать чужой код как обезьяна и немножко переделать его под себя.
Написала, перелопатив гору макросов , код, чтобы форматировать все таблицы в документе:
On Error Resume Next
Dim myTable As Table
Dim myCell As Cell
Dim myRange As Range
Dim с As Integer ‘Подсчёт количества столбцов в таблице
Dim i As Long
Application.ScreenUpdating = False ‘Запрет обновления экрана
For Each myTable In ActiveDocument.Tables
‘ Выровнять все столбцы по центру
‘Обрабатываем ячейки во всех столбцах кроме первого
‘Перебор всех ячеек
c = myTable.Columns.Count
For i = 2 To c
myTable.Columns(i).Select
Selection.Find.ClearFormatting
With Selection
For Each myCell In .Cells
myCell.Range.ParagraphFormat.Alignm ent = wdAlignParagraphCenter
myCell.Range.Cells.VerticalAlignmen t = wdCellAlignVerticalCenter
Next myCell
End With
Next i
‘ Применить ко всем таблицам одинаковый стиль
myTable.Style = ActiveDocument.Styles(«Средний список 2 — Акцент 2»)
myTable.Rows.Alignment = wdAlignRowCenter
myTable.AutoFitBehavior wdAutoFitWindow
myTable.Rows.HeightRule = wdRowHeightAuto
myTable.Rows.HeightRule = wdRowHeightAtLeast
myTable.Rows.WrapAroundText = False
myTable.PreferredWidthType = wdPreferredWidthPercent
myTable.PreferredWidth = 99
myTable.Range.Font.Size = 9
myTable.Rows.AllowBreakAcrossPages = False
With myTable.Range
.Find.ClearFormatting
.Find.Text = «^p» ‘Ищем вхождения переводов строк и удаляем их
.Find.Replacement.Text = «»
.Find.Forward = True
.Find.Execute Replace:=wdReplaceAll
For Each myCell In .Cells
Set myRange = myCell.Range
myRange.MoveEnd Unit:=wdCharacter, Count:=-1
myCell.Range.Text = Trim(myRange.Text) ‘Убираем пробелы
myCell.Range.ParagraphFormat.LeftIn dent = CentimetersToPoints(0)
myCell.Range.ParagraphFormat.FirstL ineIndent = 0
Next myCell
End With
With myTable.Rows(1)
.HeadingFormat = True ‘Установка заголовков для 1-х строк таблиц
.HeightRule = wdRowHeightAuto ‘Установка автовысоты первых строк
End With
With myTable.Rows(1)
For Each myCell In .Cells
myCell.Range.ParagraphFormat.Alignm ent = wdAlignParagraphCenter
myCell.Range.Cells.VerticalAlignmen t = wdCellAlignVerticalCenter
myCell.Range.ParagraphFormat.KeepWi thNext = True
Next myCell
End With
With myTable.Range
myTable.Select
Selection.Cells.DistributeWidth
End With
If Err.Number <> 0 Then Err.Clear
Next
Application.ScreenUpdating = True ‘Разрешаем обновление экрана
End Sub
Меня всё устраивает. Но есть одна загвоздка.
Вот это кусок кода делает ширину всех столбцов одинаковой.
With myTable.Range
myTable.Select
Selection.Cells.DistributeWidth
End With
А мне надо выровнять по ширине все столбцы, кроме первого. И с этим я не могу справиться. Ещё раз повторяю — не программист я, может, кто-нибудь подскажет, как исправить эту мелочь и ошибки во всём коде исправит?
Спасибо заранее.
Приходилось ли вам выполнять при форматировании документа несколько раз повторять одни и те же команды? Предположим, в документе 50 таблиц. И каждую надо привести в порядок. Повторяющиеся заголовки, выравнивание назначить, да мало ли чего ещё сделать. И вот раз за разом повторяются одни те же команды. Так что знакомимся с понятием МАКРОС В ТАБЛИЦЕ.
В офисных программах есть замечательная возможность: объединить несколько команд в одну макрокоманду. Макрокоманда – это последовательность команд, которые будут работать автоматически при запуске макроса.
Вот определение, которое я взяла с любимого ресурса https://dic.academic.ru/dic.nsf/ruwiki/15081:
В «офисных» продуктах (OpenOffice.org, Microsoft Office и др.), в графических программах (например, CorelDRAW) при обработке макроса автоматически выполняется заданная для каждого макроса последовательность действий — нажатия на клавиши, выбор пунктов меню и т. д.
Я приложила к уроку документ с несколькими таблицами (скачать файл тут). Я удалила текст документа (всё-таки авторское право и всё такое…):
По окончании урока вы сможете:
- Составить алгоритм форматирования таблицы
- Настроить ленту «Разработчик»
- Записать макрос форматирования таблицы
- Проверить макрос в действии
- Добавить кнопку «Макрос» на панель быстрого доступа
1. Алгоритм форматирования
таблицы
Прежде, чем приступить к созданию макроса, следует тщательно продумать, какие команды нам понадобятся. Начнём с верха таблицы
- Заголовок, повторяющийся при переходе таблицы на следующую страницу
- Выравнивание содержимого ячеек заголовков по центру и по середине
- Заливка строки заголовка цветом
- Текст заголовка таблицы полужирного начертания красного цвета
- Поля ячеек – 0,05
- Видимые границы для всей таблицы красного цвета
- Автоподбор по ширине окна (вдруг таблица меньше ширины печатного поля)
Почему такая последовательность? При написании макрокоманды есть одна особенность:
| Понять и запомнить! |
Ни в коем случае нельзя щелкать ЛМ по области документа! Работать только с лентами! |
Так вот, после выделения заголовка можно выделить всю таблицу командой с ленты, а наоборот – нельзя!
Итак, нам надо записать семь команд одной макрокомандой. По ходу дела команд может оказаться больше.
Для того, чтобы записать макрос, необходимо найти эту команду. Команда «Запись макроса» находится на ленте «Разработчик», которая в настоящий момент не видна.
2. Настройка ленты
«Разработчик»
Шаг 1. Выходим в режим настраивания ленты (ПМ в любом месте любой ленты → команда Настроить ленту из контекстного меню):
Шаг 1. Отметим галочкой ленту «Разработчик»[1]
ОК!
Вообще-то команда «Запись
макроса» есть на ленте «Вид»:
Но на ленте «Разработчик» есть много других команд, которыми я активно пользуюсь, например, создание форм и полей, поэтому эта лента присутствует у меня в обязательном порядке.
3. Макрос для таблицы. Запись макроса для форматирования таблицы
Шаг 1. Выделяем заголовок таблицы (щелкаем ЛМ
на полосе выделения напротив заголовка таблицы):
Шаг 2. Запускаем запись макроса (лента
Разработчик → группа команд Код → команда Запись макроса):
- Можно ввести имя макроса, но имейте в виду, что пробелы недопустимы, то
есть имя макроса будет выглядеть так – «Форматирование таблицы».
- Назначить выполнение макроса от нажатия единственной кнопке. Но кнопка должна быть уникальная (никогда не пользуюсь).
- Ввести описание макроса. Здесь никаких ограничений. Конечно, если макрос единственный, то можно и обойтись без описания. Я часто использую макросы, поэтому без описания просто не обойтись.
- Назначить выполнение макроса от нажатия сочетания функциональной клавиши плюс любой клавиши. Но при этом недопустимо использовать устойчивые системные сочетания, например, Ctrl+X, так как это сочетание зарезервировано для команды «Вырезать в буфер обмена».
- Из этого выпадающего меню выбираем доступность макроса для определенного документа. Если выбираем Normal.dotm, то наш макрос будет доступен для всех документов, созданных на основе шаблона Normal.dotm. Если мы создали документ на основе другого пользовательского шаблона, то в списке появится имя этого пользовательского шаблона, и тогда все документы на основе этого шаблона будут иметь внедрённый макрос. Но это действительно только для шаблонов, которые имеются на нашем компьютере.
Шаг 3. Назначаем сочетание клавиш (например,
Ctrl+1):
Нажимаем клавиши «Назначить» и «Закрыть» и знакомимся с новым видом курсора:
Шаг 4. Назначаем режим «Повторить строки
заголовков» (лента Макет → группа команд Данные → команда Повторить строки
заголовков):
Шаг 5. Назначаем выравнивание содержимого
ячеек строки заголовков по центру (лента Макет → группа команд Выравнивание → команда
Выровнять по центру):
Шаг 6. Назначаем заливку строки заголовка
(лента Конструктор → группа команд Стили таблиц → команда Заливка → выбор цвета
заливки из палитры):
Шаг 7. Устанавливаем полужирное начертание шрифта
заголовка и назначаем ему красный цвет (лента Главная → группа команд Шрифт → кнопка
«Ж» и кнопка Цвет текста → выбор цвета из палитры):
Шаг 8. Выделяем всю таблицу лента Макет → группа
команд Таблица → команда Выделить → команда Выделить таблицу из выпадающего
меню):
Шаг 9. Назначаем границы таблицы (лента
Конструктор → группа команд Обрамление → команда Цвет пера → выбор цвета
границы из палитры → команда Граница → команда Все границы из выпадающего
меню):
Шаг 10. Назначаем поля ячеек (лента Макет → группа команд Выравнивание → команда Поля ячейки → диалоговое окно Параметры таблицы[2] → Поля ячеек пользовательские):
Шаг 11. Устанавливаем Автоподбор таблицы по ширине окна (лента Макет → группа команд Размер ячейки → команда Автоподбор по ширине окна[3] из выпадающего меню):
Шаг 12. Останавливаем запись макроса (лента
Разработчик → группа команд Код → команда Остановить запись):
Команда «Остановить запись» дублируется скромным квадратиком на строке состояния:
Всё! Макрос для таблицы готов!
4. Проверка макроса в действии
Шаг 1. Выделяем заголовок любой таблицы:
Шаг 2. Нажимаем сочетание клавиш Ctrl+1 и любуемся результатом:
А теперь посмотрим,
как будет работать макрос на таблице со сложным заголовком. В учебном файле это
Таблица 4.
Шаг 1. Выделяем сложный заголовок, то есть
заголовок, состоящий из двух строчек и объединённых ячеек:
Шаг 2. Нажимаем сочетание клавиш Ctrl+1 и любуемся результатом:
И под занавес.
5. Кнопка запуска макроса «Форматирование_таблицы» на Панели быстрого доступа
Шаг 1. Вызываем диалоговое окно «Параметры Word» (Панель быстрого доступа → команда Другие команды из выпадающего меню):
Как настраивать Панель быстрого доступа я рассказывала в Уроке 18 и Уроке 19.
Шаг 2. Выбираем список «Макрос» (кнопка выпадающего
меню → список Макрос):
Шаг 3. Добавляем макрос для таблицы на Панель быстрого доступа (пока макрос один, но у нас всё впереди):
ОК! А вот результат:
Макрос для таблицы будет запускаться при нажатии кнопки на Панели быстрого доступа.
Теперь вы сможете:
- Составить алгоритм форматирования таблицы
- Настроить ленту «Разработчик»
- Записать макрос форматирования таблицы
- Проверить макрос в действии
- Добавить кнопку «Макрос» на панель быстрого доступа
[1]
В контекстном меню – «Настройка ленты», а в окне «Параметры Word» – «Вкладка»
[2] Интересно, почему команда «Поля ячейки», а диалоговое окно называется «Параметры таблицы»? Загадка природы, небрежность переводчиков или шутка разработчиков?
[3]
Вообще-то команда имеет смысл «Автоподбор по ширине печатного поля», но не
будем придираться.