Адреса ячеек в редакторе Word. Способы вычислений, использование формул, форматы чисел.
Для проведения вычислений в таблице Word необходимо установить курсор в соответствующей ячейке (с ожидаемым результатом), использовать команду меню Таблица Формулаиввести данные в диалоговом окне Формулаили выбрать нужную функцию.
Название функции можно вводить с клавиатуры или выбирать из раскрывающегося списка функций в диалоговом окне Формула.Все функции имеют одинаковый формат записи и включают имя функции и находящийся в круглых скобках перечень аргументов, например: =SUM(А1;В2;С4).
Дляфункций с пустыми скобками допустимо любое число аргументов, разделенных точкой с запятой (;). При ссылке на интервал между адресами первой и последней ячейки используется символ (:). Аргументы могут быть числами, формулами, адресами ячеек или именами закладок. Адрес каждой ячейки содержит № столбца (Латинский алфавит) и № строки (арабские цифры). Вычисления начинаются со знака «=». Так, выражение: «=А1+В3» означает сумму значений ячейки, стоящей на пересечении первого столбца и первой строки и ячейки, стоящей на пересечении второго столбца и третьей строки таблицы.
Для функций, которые приведены в табл. 4, разрешается использовать в качестве аргументов также ссылки на ячейки в таблицах или ключевые слова (ABOVE –суммирует все ячейки находящиеся выше выделенной ячейки, LEFT- суммирует все ячейки находящиеся левее выделенной ячейкии т.д.).
Некоторые встроенные функции Word Таблица4
Функция | Назначение |
SUM | Нахождение суммы чисел в указанном блоке ячеек |
PRODUCT | Произведение чиселв указанном диапазоне ячеек |
MAX | Нахождение максимального значения в указанном блоке ячеек |
MIN | Нахождение минимального значения в указанном блоке ячеек |
COUNT | Подсчет числа значений в указанном диапазоне ячеек |
AVERAGE | Вычисление среднего значения для диапазона ячеек |
Формат вывода результата вычислений можно изменять по усмотрению пользователя в диалоговом окне Формула в поле Формат числа, например 0,00 (с двумя десятичными знаками после запятой), 0,00% (в виде процентов) и т.д.
При вычислениях с помощью формул необходимо соблюдать принятый в математике порядок арифметических операций (таблица 5):
сначала производится возведение в степень;
затем – умножение и деление (они имеют одинаковый приоритет);
в последнюю очередь – сложение и вычитание (они также имеют одинаковый приоритет).
Приоритет арифметическихоператоров Таблица 5
Оператор | Назначение | Приоритет |
+ | Сложение | Самый низкий |
– | Вычитание | Самый низкий |
* | Умножение | Высокий |
/ | Деление | Высокий |
^ | Возведение в степень | Наивысший |
Если два оператора в формуле имеют одинаковый приоритет, вычисление производится слева направо. Нормальный порядок выполнения операций изменяют введением скобок. Операции в скобках выполняются первыми.
Форматирование таблиц, автоформат. (в билете28 есть инфо для билета30)
При форматировании таблицы можно задать, какие следует провести границы при печати, какого они должны быть цвета и толщины, как закрасить ячейки. Для прочерчивания границ таблицы или нескольких ячеек выделите только требуемые ячейки, включая их содержимое, выберите соответствующий элемент из списка Границы панели инструментов Форматирование (рис. 7.7). При вставке таблицы ее граница по умолчанию устанавливается в виде тонкой сплошной линии черного цвета. Для добавления другой границы выберите команду Границы и заливка в меню Формат и откройте вкладку Граница. Задайте параметры Тип, Цвет и Ширина. Убедитесь, что в списке Применить к выбран верный параметр: таблице или ячейке.
Рис. 7.7Прочерчивание/удаление границ ячеек таблицы
Также для форматирования можно воспользоваться кнопкой Автоформат.
Подготовка процессора электронных таблиц Excel к работе. Структура рабочего листа, книги.
При запуске М. Excel открывается новая книга. Настройку окна можно менять.Обычно в окне Excel присутствуют панели инструментов Стандартная и Форматирование, строка формул и строка состояния.
Меню Excel разделено на несколько пунктов — это Файл, Правка, Вид, Вставка, Формат, Сервис, Данные, ОкноиСправка.
Рабочая книга по умолчанию содержит 3 листа. При необходимости количество листов можно увеличивать с помощью команды Вставка → Лист. Максимальное количество листов в книге равно 255. В каждом листе 356 столбцов и 65 536 строк. Таким образом каждый лист содержит 16 777 216 ячеек. Все ячейки имеют однотипность оформления. Рабочее окно табличного редактора Excel имеет горизонтальную и вертикальную прокрутки с маркерами разделения. Последние позволяют разделить рабочую область на четыре части. Информация в ячейки вводится с клавиатуры. Это могут быть константы, текст, формулы и т.д. активная ячейка имеет маркер заполнения, расположенный в правом нижнем углу ячейки, с помощью которого можно распространить информацию по всем четырем направлениям.
Опора деревянной одностоечной и способы укрепление угловых опор: Опоры ВЛ — конструкции, предназначенные для поддерживания проводов на необходимой высоте над землей, водой.
Поперечные профили набережных и береговой полосы: На городских территориях берегоукрепление проектируют с учетом технических и экономических требований, но особое значение придают эстетическим.
Механическое удерживание земляных масс: Механическое удерживание земляных масс на склоне обеспечивают контрфорсными сооружениями различных конструкций.
Как узнать название ячейки в таблице в ворде
← →
M_a_r_i_n_a ( 2005-05-26 17:38 ) [0]
А можно ли узнать адреса ячеек таблицы, которая в Worde? Если да, то как это сделать?
Спасибо
← →
YurikGL © ( 2005-05-26 17:44 ) [1]
> А можно ли узнать адреса ячеек таблицы, которая в Worde?
> Если да, то как это сделать?
> Спасибо
По каким входным параметрам?
← →
M_a_r_i_n_a ( 2005-05-26 17:47 ) [2]
Допустим, даже в самом Ворде
← →
YurikGL © ( 2005-05-26 17:50 ) [3]
> M_a_r_i_n_a (26.05.05 17:47) [2]
1)Что понимаешь под адресом ячейки?
2)Пусть у тебя есть 10 таблиц, в каждой по 100 ячеек. адрес какой нужен?
← →
M_a_r_i_n_a ( 2005-05-26 17:54 ) [4]
Адрес ячейки, в моем понятии, это номер строки и номер столбца. Ячейка из этого и состоит. У меня одна таблица, в которой не понятно как располагаются строки и столбцы т.к. в некоторые ячейки объеденены.
← →
YurikGL © ( 2005-05-26 18:02 ) [5]
> У меня одна таблица, в которой не понятно как располагаются
> строки и столбцы т.к. в некоторые ячейки объеденены.
И чего надо?
← →
rOOse © ( 2005-05-26 18:07 ) [6]
Таблицы в документе Word образуют коллекцию Tables. Их количество можем узнать так:
к отдельной таблице обращаемся по ее номеру:
где i — целое число. В данном случае мы обращаемся к первой таблице, а вообще i может принимать значения от 1 до WordDocument1.Tables.Count. Если нам необходимо создать таблицу самим, следует поступить так:
WordDocument1.Tables.Add(WordDocument1.Range, i, j, EmptyParam, EmptyParam);
Эта таблица — единственное, что будет в документе, так как она заменяет собой указанный в числе параметров объект Range. В данном случае получаем таблицу на i строк и j столбцов. Если уже еcть какой-то текст, который надо сохранить, совершенно аналогичным образом можем указать пределы объекта Range:
a:=5;
b:=15;
WordDocument1.Tables.Add(WordDocument1.Range(a,b), i, j, EmptyParam, EmptyParam);
Переменные a и b должны быть объявлены как OleVariant.
Ну вот, теперь у нас есть таблица. Неважно, содержалась она уже в документе или мы создали ее сами. Посмотрим, что же мы с ней можем сделать. Число столбцов и строк узнаем так:
Здесь мы опять обратились к первой таблице, но можем работать с любой — надо только правильно указать ее номер. Теперь изменим ширину столбцов или высоту строк:
Аналогично можем задавать размеры отдельных строк и столбцов:
Здесь j — опять таки целое число, начинается от 1. Можем обратится к отдельной ячейке, прочитать или изменить содержащийся в ней текст:
Здесь j и k целые переменные, изменяются от 1 до числа строк или столбцов соответственно. Присвоив данной величине строковое выражение, увидим, что оно появилось в ячейке (j,k). Несколько непривычно, но в таблицах Word на первом месте стоит именно номер строки.
← →
TUser © ( 2005-05-26 20:03 ) [7]
> Адрес ячейки, в моем понятии, это номер строки и номер столбца
А если использовано объединение ячеек?
← →
M_a_r_i_n_a ( 2005-05-26 20:26 ) [8]
Адреса ячеек я узнала. Но когда обращаюсь к определенной ячейке через Делфи у меня всё зависает!
← →
YurikGL © ( 2005-05-27 07:26 ) [9]
> А если использовано объединение ячеек?
Насколько помню, у нее будет номер верхней левой из объединенных ячеек.
> Но когда обращаюсь к определенной ячейке через Делфи у меня
> всё зависает!
Как обращаешься?
Как удалить ячейку в таблице Ворд за несколько секунд
Всем привет. Вас приветствует Фёдор Лыков — создатель блога «Основы ПК». Как часто вы допускаете ошибки при создании таблиц в текстовом редакторе Ворд? Думаю, что такое событие периодически происходит. После этого приходится долго сидеть в интернете. Однако если знать что делать проблема перестает таковой быть. Поэтому предлагаю сегодня разобраться с вопросом, как удалить ячейку в таблице Ворд.
Такая ситуация может произойти если вы допустили ошибку из-за невнимательности. В таких случаях обычно нужно оставить таблицу, но убрать один единственный прямоугольник.
Перед тем как мы начнем погружаться в дебри и разбираться с удалениями, посмотрите, пожалуйста, на статью, как обновить браузер Яндекс. В ней вы узнаете, что нужно делать, чтобы бесплатно получить актуальную версию браузера.
Выполняем удаление
Рассмотрим на примере, в каком случае такой вариант может понадобиться.
Представьте, что у вас введён некий массив данных. Но из только что созданной таблицы нужно удалить только одну ячейку.
Это можно сделать с помощью удаления. Для нас разработчики придумали два способа, к которым можно прибегнуть: через контекстное меню и с помощью инструмента удалить.
Рассмотрим каждый из них более подробно.
Контекстное меню
Ворд многогранная программа и подходит для решения любых задач. Одной из увлекательных функций является рисование. Вы об этом даже не догадывались. Подробнее ознакомиться с тем, как рисовать в Word можно, перейдя по ссылке.
Обратимся к контекстному меню. Но перед этим нам нужно кликнуть кнопкой мышки по ячейке (или группе) которая должна подвергнуться удалению.
Это действие приведёт к окрашиванию выбранного поля в другой цвет. Что будет означать: клетка выделена. Теперь с ней можно работать.
После этого нужно кликнуть правой кнопкой мыши по выделенной области. При этом откроется диалоговое окно, в котором нас будет интересовать строка под названием «Удалить ячейки».
Функция «Удалить»
Однако существует альтернативный вариант. Так же как и в первом случае делаем выделение необходимых ячеек.
После этого, если подвести к ним курсор, то рядом появится панель управления. Если подвести курсор к кнопке «Удалить» станет активным выпадающий список. Нажимаем на «Удалить ячейки».
И первый, и второй способ завязан вокруг диалогового окна. В обоих случаях после обращения к выпавшему списку команд появится ещё один набор команд.
Теперь нам придется работать с ним.
Нужно поставить точку напротив первой строки. Это там, где написано «со сдвигом влево».
Применяя вторую строку мы не получим нужного результата. Однако в таком случае ничего не произойдет. Последние две строки вообще не предназначены для решения поставленной задачи. Они, например, понадобятся если нужно удалить всю строку или столбец.
После этого кликаем по кнопке «ОК». Это действие будет символизировать подтверждение наших действий.
Также советую вам обратить внимание на статью, как без проблем зарегистрироваться на Госуслугах. Это очень полезный сервис. В нем можно, к примеру, записаться на прием к врачу, не выходя из дома. При сложившейся ситуации в мире, считаю это актуальным. Не правда ли?
Когда мы нажали на кнопку «Ок» ненужная ячейка будет удалена, а расположенная справа от нее информация сместится влево. Стоит отметить, что на месте последней в ряду появится пустое поле.
Работать с таблицами можно не только в Ворд, но и в Гугл Таблицах. Ознакомиться с тем, что это такое можно перейдя по ссылке.
Как удалить ячейку в таблице ворд с помощью встроенной функции
Предварительно выделив всю таблицу или небольшую ее часть можно воспользоваться инструментом, который располагается на верхней панели Word. Для работы с таблицами тут есть отдельный блок, предназначенный для редактирования поля. Стоит отметить, что он носит название «Работа с таблицами». К примеру, её можно использовать для решения задачи, поставленной в теме статьи.
Чтобы это сделать кликаем по ячейке, которую требуется удалить. После чего открываем вкладку «Макет».
Теперь нам необходимо обратиться к блоку «Строки и столбцы». После этого кликаем по кнопке «Удалить».
Это действие покажет нам список возможных действий с ячейками. В нем нас будет интересовать самая первая строка. Она называется «Удалить ячейки».
Дальше все просто. Появится аналогичное предыдущему способу окно. Тут нам необходимо активизировать первое действие, то есть «со сдвигом влево». После чего нажимаем на клавишу «ОК».
При этом мы добьемся того же результата. Выбранная ячейка будет уничтожена, а находящиеся справа переместятся влево.
Как удалить ячейку в таблице Ворд с помощью объединения ячеек
Стоит отметить, что озвученные выше способы решают поставленную задачу. Однако результат получается, мягко говоря, не очень презентабельным. Однако он получается не эстетичным из-за некрасивого смещения полей таблицы.
Как по мне, лучше применить объединение ячеек. Данная функция также доступна в контекстном меню, которое вызывается нажатием на правую кнопку мышки.
Функция объединения ячеек доступна в подменю «макет», которое располагается в верхней части программы. Как туда попасть мы рассмотрели выше, когда разбирались с удалением поля таблицы.
К примеру, результат объединения можно посмотреть на изображении ниже.
Заключение
Подошла к завершению очередная статья. В заключение, хочу повторить, какими способами можно избавиться от ненужной ячейки. Мы сегодня рассмотрели три действенных метода, чтобы решить вопрос, как удалить ячейку в таблице ворд: удаление через контекстное меню, через вкладку «макет» и с помощью объединения ячеек.
К тому же они помогают полностью справиться с проблемой, без дополнительных средств. Поэтому они и пользуются популярностью среди пользователей Word.
Напишите в комментариях, каким из вышеперечисленных способов обычно пользуетесь вы.
В завершение статьи хочу предложить вам помощь. Стоит отметить, что уже несколько лет я занимаюсь продвижением и созданием блогов. Мой стиль работы вы можете оценить, например, на блоге «Основы ПК».
Если у тебя есть желание получить сайт с высокой активностью, который будет приносить прибыль, то подробно ознакомиться со всеми тарифами можно тут. К тому же я не бросаю своих клиентов после сдачи сайта. В любое время прихожу на помощь и консультирую по всем возникающим вопросам.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
1 23.06.2017 09:07:50
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Тема: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Здравствуйте!
Необходимо найти ячейку с нужным текстом. Как правильно искать?
Есть вот такая идея, прошу отредактировать, так как это только алгоритм, сам код кривой:
Поиск по строкам таблицы, а внутри строки – по ячейкам
Dim iStr, iCol As Integer
For iStr = 1 To .Table.Count
For iCol = 1 To .Cells.Count
Find.Text = "искомый текст"
MsgBox (ячейка с искомым текстом)
Next
Next
Прошу правильно записать этот код. Или код с функцией For Each. Или ещё какой-нибудь способ.
Спасибо.
2 Ответ от MrBrown 23.06.2017 09:26:49
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Вопрос снят: нашел несколько решений здесь:
внешняя ссылка
3 Ответ от MrBrown 24.06.2017 13:55:31
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Увы, рано закрыл вопрос.
Туплю чего-то. Не получается.
Вот часть кода:
n = oDoc.Tables(2).Rows.Count 'количество строк таблицы
m = oDoc.Tables(2).Columns.Count 'количество столбцов таблицы
For i = 1 To n
For j = 1 To m
With oDoc.Tables(2).Range
.Find.ClearFormatting
.Find.Text = "контроля:" 'Ищем вхождения текста
.Wrap = wdFindStop
If .found = True Then
MsgBox i & "-" & j 'Номера строки и столбца с искомым вхождением
Else
MsgBox "нет"
End If
End With
Next
Next
Здесь MsgBox последовательно выдает все строки и столбцы. А мне надо получить индекс самой первой ячейки с нужным вхождением.
И ещё вопрос: как искать ячейку, введя только часть текста, например “контр”?
p.s. ну и прошу поправить код в смысле культуры оформления.
Спасибо.
4 Ответ от Fck_This 26.06.2017 10:10:45
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MrBrown пишет:
Увы, рано закрыл вопрос.
Туплю чего-то. Не получается.
И ещё вопрос: как искать ячейку, введя только часть текста, например “контр”?
p.s. ну и прошу поправить код в смысле культуры оформления.
Спасибо.
Эммм
Лучше искать так
Sub ValueOfCell()
'Запоминаем текст ячейки в переменную
Dim sValue
Dim oCell As Cell
Dim oDoc As Document
Set oDoc = ActiveDocument
For Each oCell In oDoc.Tables(2).Cell
If InStr(oCell.Range.Text, "контроля:") >= 1 Then
sValue = oCell.Range.Text
MsgBox sValue
End If
Next oCell
End Sub
Ну и, понятное дело, если часть текста будете искать, то часть и указываете
Ещё можно методом Selection.Find.Execute искать по всему документу и проверять найденную строку на вхождение в таблицу 2, заранее установив область начала и конца таблицы.
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
5 Ответ от MrBrown 26.06.2017 12:14:20
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Почему-то выскакивает такая ошибка:
User-defined type not defined
Как в коде определить этот тип?
6 Ответ от MrBrown 26.06.2017 12:16:16
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Забыл сообщить: ругается на строчку
Dim oCell As Cell (выделяет жёлтым)
7 Ответ от Fck_This 26.06.2017 15:15:40
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Пардон. Надо так. Не проверял на документе
Sub ValueOfCell()
'Запоминаем текст ячейки в переменную
Dim sValue As String
Dim oCell As Cell
Dim oDoc As Document
Set oDoc = ActiveDocument
For Each oCell In oDoc.Tables(1).Range.Cells
If InStr(oCell.Range.Text, "контроля:") >= 1 Then
sValue = oCell.Range.Text
MsgBox sValue
End If
Next oCell
End Sub
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
8 Ответ от MrBrown 27.06.2017 09:57:26
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Всё равно ругается на эту же строчку.
9 Ответ от shanemac51 27.06.2017 11:22:32
- shanemac51
- генерал-полковник
- Неактивен
- Зарегистрирован: 05.03.2012
- Сообщений: 467
- Поблагодарили: 119
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
и какой же текст ругани
—
у меня все работает
10 Ответ от shanemac51 27.06.2017 11:25:39
- shanemac51
- генерал-полковник
- Неактивен
- Зарегистрирован: 05.03.2012
- Сообщений: 467
- Поблагодарили: 119
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
какая у вас версия и разрядность ВИНДОВС
и офиса
—
32 или 64
11 Ответ от MrBrown 27.06.2017 11:34:15
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Ругается вот так:
User-defined type not defined
на строку
Dim oCell As Cell
Система Win 8.1 х 64
Офис 2013.
И система и офис – легальные.
12 Ответ от MrBrown 27.06.2017 11:36:25
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Полное содержание ошибки:
Compile error:
User-defined type not defined
13 Ответ от yshindin 27.06.2017 11:44:27
- yshindin
- генерал-полковник
- Неактивен
- Откуда: Москва
- Зарегистрирован: 12.05.2012
- Сообщений: 447
- Поблагодарили: 171
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MrBrown пишет:
Ругается вот так:
User-defined type not defined
на строку
Dim oCell As Cell
Система Win 8.1 х 64
Офис 2013.
И система и офис – легальные.
Попробуйте использовать oCell как объект общего вида:
Dim oCell as Object
14 Ответ от shanemac51 27.06.2017 13:15:20
- shanemac51
- генерал-полковник
- Неактивен
- Зарегистрирован: 05.03.2012
- Сообщений: 467
- Поблагодарили: 119
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
может у вас битая ссылка(например типа Календарь)
какая разрядность офиса (32 или 64)
15 Ответ от MrBrown 27.06.2017 13:48:16
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Офис 2013 х32
16 Ответ от Fck_This 27.06.2017 13:56:24
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
- За сообщение: 1
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MrBrown пишет:
Офис 2013 х32
В этом случае, мне помнится, не играет роль версия ворда
Пробуйте так
Sub ValueOfCell()
'Запоминаем текст ячейки в переменную
Dim sValue As String
Dim oDoc As Document
Set oDoc = ActiveDocument
For Each Cell In oDoc.Tables(1).Range.Cells
If InStr(Cell.Range.Text, "контроля:") >= 1 Then
sValue = Cell.Range.Text
MsgBox sValue
End If
Next Cell
End Sub
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
17 Ответ от MrBrown 27.06.2017 14:09:31
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Работает!
Прошу извинить, это я сам недоглядел: в самом начале макроса уже было такое:
Dim oDoc As Object
Set oDoc = WD.Documents.Open(Filename:=File)
Видимо, по этой причине не работало.
Сейчас работает.
Только мне нужен не сам текст, а адрес ячейки, в которой он находится, чтобы от неё дальше плясать.
Надо что-то типа такого:
MsgBox [№ строки, № столбца]
18 Ответ от Fck_This 27.06.2017 14:20:21
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MrBrown пишет:
Работает!
Прошу извинить, это я сам недоглядел: в самом начале макроса уже было такое:Dim oDoc As Object Set oDoc = WD.Documents.Open(Filename:=File)
Видимо, по этой причине не работало.
Сейчас работает.
Только мне нужен не сам текст, а адрес ячейки, в которой он находится, чтобы от неё дальше плясать.
Надо что-то типа такого:
MsgBox [№ строки, № столбца]
Вы опять идете в ту же ловушку зависимости от адреса ячейки. Зачем знать адрес ячейки, если он не статичен?!
Можно использовать RowIndex & ColumnIndex
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
19 Ответ от MrBrown 27.06.2017 14:20:36
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MsgBox cell.Row & cell.Column
не работает
20 Ответ от MrBrown 27.06.2017 14:24:19
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Именно по этой причине, что – не статичен!
В каком-то акте Word эта ячейка, допустим, на 24-й строке, в другом акте – на 25-й строке.
А в следующей ячейке – нужная мне инфа, которую надо загнать в реестр Excel.
Если привязаться только к 24-й строке жёстко, то нужная инфа из другого (кривого) файла Word запишется криво, не та и не в те ячейки.
Я же пробовал.
21 Ответ от MrBrown 27.06.2017 14:26:22
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Я вижу, что всех работников “под одну гребенку” не причешешь:
нет-нет, да найдется “тётенька”, которой, ну, жизненно необходимо добавить ещё одну строчку в акте Word!
22 Ответ от Fck_This 27.06.2017 14:31:48
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
MrBrown пишет:
Я вижу, что всех работников “под одну гребенку” не причешешь:
нет-нет, да найдется “тётенька”, которой, ну, жизненно необходимо добавить ещё одну строчку в акте Word!
Так а смысл вам обращаться к ячейке, если вы уже осуществляете поиск по тексту?
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
23 Ответ от MrBrown 27.06.2017 14:32:59
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Опечатка:
добавить не строчку в текст , а строку в таблицу.
Ну или разделить/объединить ячейки таблицы.
И данный акт Word автоматом становится “кривым”.
24 Ответ от MrBrown 27.06.2017 14:41:37
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Для понимания прикладываю шаблон акта Word.
Допустим, макрос нашел текст во второй таблице:
“2. Работы выполнены по проектной документации”.
Но мне нужен не этот текст, а следующий за ним (выделен красным).
А если эта документация занимает не две, а пять-шесть строчек, то их приходится добавлять инженеру.
А раз строчки добавлены, значит строчки начала и конца работы тоже “сползут” вниз.
Так вот я стремлюсь все нужные данные “привязать” к своим текстам, выполненным шрифтом Bold.
Макрос ищет очередной текст и вставляет в реестр НЕ ЕГО, А СЛЕДУЮЩИЙ ЗА НИМ!
Подскажите метод, который считаете лучшим.
Спасибо.
Post’s attachments
Word.docx 21.13 Кб, 2 скачиваний с 2017-06-27
You don’t have the permssions to download the attachments of this post.
25 Ответ от Fck_This 27.06.2017 14:51:24
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Я бы находил текст, переходил на следующую ячейку, брал текст и переходил дальше – Если пусто или если маркер – переход на следующий поиск. Если текст – добавляем текст и идём дальше. В Ворде существует серьёзная проблема с обращением к ячейкам по их адресу в тех таблицах, где существуют объединённые ячейки.
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
26 Ответ от MrBrown 27.06.2017 14:58:23
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Я бы то же так сделал бы, если б знал )
Вопрос: как перейти на следующую ячейку?
Это главное на сей момент.
27 Ответ от MrBrown 27.06.2017 14:59:27
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
С offset-ом у меня беда…
28 Ответ от MrBrown 27.06.2017 15:04:41
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Вопрос: что такое маркер?
Ну, применительно к моей проблеме.
29 Ответ от shanemac51 27.06.2017 15:18:43
- shanemac51
- генерал-полковник
- Неактивен
- Зарегистрирован: 05.03.2012
- Сообщений: 467
- Поблагодарили: 119
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
я бы видимо не стала привязываться к таблице , а перебирала бы параграфы
вечером попробую на вашем примере
30 Ответ от shanemac51 27.06.2017 16:13:00
- shanemac51
- генерал-полковник
- Неактивен
- Зарегистрирован: 05.03.2012
- Сообщений: 467
- Поблагодарили: 119
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
не совсем четко, но получила
Sub ValueOfCell_170627()
'Запоминаем текст ячейки в переменную
Dim sValue As String
Dim c1 As Cell, s1, k1, k2
Dim oDoc As Document
Set oDoc = ActiveDocument
Dim tbl As Table
k1 = 0
k2 = 0
For Each tbl In Word.ActiveDocument.Tables
tbl.Select
For Each c1 In Selection.Cells
s1 = Replace(c1.Range.Text, Chr(13), " ")
s1 = Replace(s1, Chr(10), " ")
s1 = Replace(s1, Chr(9), " ")
s1 = Replace(s1, Chr(7), " ")
s1 = Replace(s1, Chr(11), " ")
s1 = Replace(s1, " ", " ")
If c1.Range.Font.Size < 7 Then s1 = ""
If s1 Like "5. *" Then
Debug.Print
Debug.Print s1;
k1 = 0
k2 = 0
s1 = ""
ElseIf s1 Like "[12346789]. *" Then
Debug.Print
'Debug.Print s1;
k1 = 0
k2 = 8
s1 = ""
ElseIf s1 Like "требованиям:*" Then
k1 = 0
k2 = 8
s1 = ""
''требованиям:
ElseIf s1 Like "Дополнительные сведения*" Then
k1 = 0
k2 = 0
ElseIf s1 Like "№ *" Then ''№ 000/2.15-КЖ
Debug.Print
Debug.Print s1
k1 = 0
k2 = 0
ElseIf s1 Like "*20??г*" Then '' "15" марта 2017г
Debug.Print
Debug.Print s1
k1 = 0
k2 = 0
Else
''
End If
k1 = k1 + 1
If k1 < k2 And k1 > 0 And Len(s1) > 0 Then
If k1 = 1 Then
Debug.Print
Debug.Print s1; " ";
Else
Debug.Print s1; " ";
End If
End If
Next c1
Next tbl
'''№ 0 / 2.15 - КЖ
'''
'''«15» марта 2017г.
'''
'''Установка опалубки фундаментов в/о А-С/1-2 отм. +(55.600?58.100).
'''ООО «[наименование ООО]» 2.15-КЖ Лист 2
'''
'''
'''5. Даты: начала работ «10» марта 2017г. окончания работ «14» марта 2017г.
End Sub
31 Ответ от MrBrown 29.06.2017 07:33:23
- MrBrown
- лейтенант
- Неактивен
- Зарегистрирован: 13.06.2017
- Сообщений: 41
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
shanemac51, спасибо за отклик, но увы, сколько ни бился, у меня всегда выскакивает какая-нибудь ошибка. Много ещё не понимаю.
Сейчас пока (с великой благодарностью) пользуюсь макросом, предложенным мне Fck_This (см. в приложенном файле-реестре). С этим макросом из десятка обработанных актов Word два-три вставляются криво, это потому, что сами акты Word кривые – с добавленными/убавленными строками, объединёнными/разбитыми ячейками. Такие акты заношу в реестр вручную.
Буду весьма признателен, если Вы доработаете именно этот макрос применительно к моим “хотелкам”:
1. Находить нужные данные и вставлять их в реестр Excel несмотря на добавление/удаление строк в актах Word, объединение/разбиение ячеек.
2. Запоминать последнюю выбранную директорию и начинать новую сессию именно с неё.
Спасибо.
p.s. Все записи в файле Word, выполненные шрифтом Bold – неизменные. Их никогда не удаляют и не редактируют. К ним и нужно привязываться.
Post’s attachments
Реестр АОСР.xls 40 Кб, 2 скачиваний с 2017-06-29
You don’t have the permssions to download the attachments of this post.
32 Ответ от Alexsh 26.12.2017 18:24:04
- Alexsh
- рядовой
- Неактивен
- Зарегистрирован: 26.12.2017
- Сообщений: 1
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Доброго времени суток !Если есть вариант,помогите полжалуйста в поиске решения.После выполнения Макроса(копирование и вставка Таблицы) при определенном условии(при определенном изменении ячейки),не могу эту самую таблицу заполнить,Макрос удаляет лишнее,и оставляет только то,что было в него записано макрорекордером.Вопрос.Как его остановить в строке vba,что бы когда нужно(при изменении значения ячейки) он срабатывал,но потом не мешал эту самую таблицу заполнять?Заранее благодарю за полезный ответ!
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(3, 2) =
33 Ответ от Fck_This 27.12.2017 10:06:04
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
Alexsh пишет:
Доброго времени суток !Если есть вариант,помогите полжалуйста в поиске решения.После выполнения Макроса(копирование и вставка Таблицы) при определенном условии(при определенном изменении ячейки),не могу эту самую таблицу заполнить,Макрос удаляет лишнее,и оставляет только то,что было в него записано макрорекордером.Вопрос.Как его остановить в строке vba,что бы когда нужно(при изменении значения ячейки) он срабатывал,но потом не мешал эту самую таблицу заполнять?Заранее благодарю за полезный ответ!Private Sub Worksheet_Change(ByVal Target As Range) If Cells(3, 2) =
Как я понял – вам надо сделать так, чтобы макрос заполнял только пустые? Или как?Не знаю, что там с вашим методом – использую книжный (Создаём в модуле
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
34 Ответ от Fck_This 27.12.2017 10:10:39
- Fck_This
- генерал-полковник
- Неактивен
- Откуда: Минск, Беларусь
- Зарегистрирован: 13.07.2016
- Сообщений: 648
- Поблагодарили: 97
Re: Как просканировать всю таблицу в поисках ячейки с нужным текстом?
КАПЧА ОБРЕЗАЕТ!!
Alexsh пишет:
Доброго времени суток !Если есть вариант,помогите полжалуйста в поиске решения.После выполнения Макроса(копирование и вставка Таблицы) при определенном условии(при определенном изменении ячейки),не могу эту самую таблицу заполнить,Макрос удаляет лишнее,и оставляет только то,что было в него записано макрорекордером.Вопрос.Как его остановить в строке vba,что бы когда нужно(при изменении значения ячейки) он срабатывал,но потом не мешал эту самую таблицу заполнять?Заранее благодарю за полезный ответ!
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(3, 2) =
Как я понял – вам надо сделать так, чтобы макрос заполнял только пустые? Или как?
Не знаю, что там с вашим методом – использую книжный (Создаём в модуле “Эта книга”)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
sCell = Target.Address ‘Эта строка покажет адрес изменяемой ячейки
sValue = Target ‘Эта строка покажет введённый текст
If Target = “Hello World” Then
‘Это условие позволит выполнить действие при условии, что содержимое изменяемой ячейки
‘соответствует необходимое. В этом промежутке указываем то, что нужно выполнить
End If
‘Если надо найти вхождение текста в текст ячейки, то используем:
If InStr(Target, “Hello”) >= 1 Then
‘Указываем, что надо сделать
End If
End Sub
Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
248
14 декабря 2007 года
Dmitry2064
590 / / 06.12.2006
Все прекрасно сработало (из ПримерчикаТаблицы.zip). Только одна просьба. Подскажите, как теперь удалить текст со скобками из первой ячейки, который мы переносим в соседнюю?
Я стал делать так:
Код:
Set ActiveDocument.Range = xs ‘тут ругается.
n2 = InStr(xs, “)”)
xs1 = Mid(xs, n1, n2 – n1 + 1)
With Range.Find
.Text = xs1
.Replacement.Text = “”: .Forward = True: .Wrap = wdFindContinue: .Format = False: .MatchCase = False
End With
За ссылочки отдельное спасибо Host’y.
Короче говоря, осталось объявить ячейку, в которой нашлись скобки Ранджем и там уже можно заменить на пустоту (или даже удалить текст).
Вот можно ли подсказать, как надо записать “выставление Range’a” в данной ячейке?
Спасибо.
И еще вопросик:
для чего нужны две последние строки в коде процедуры
imax = ActiveDocument.Tables(1).Rows.Count
jmax = ActiveDocument.Tables(1).Columns.Count?
С помощью команды Формула можно добавить в таблицу столбец или строку с числами.
-
Щелкните ячейку таблицы, в которой вы хотите получить результат.
-
На вкладке Работа с таблицами | Макет щелкните Формула.
-
Проверьте данные в круглых скобках, чтобы убедиться в том, что Word содержит нужные ячейки для подсчета суммы.
Функция =SUM(ABOVE) складывает числа в столбце, расположенные над выбранной ячейкой.
Функция =SUM(LEFT) складывает числа в строке, расположенные слева от выбранной ячейки.
Функция =SUM(BELOW) складывает числа в столбце, расположенные под выбранной ячейкой.
Функция =SUM(RIGHT) складывает числа в строке, расположенные справа от выбранной ячейки.
Изменив складываемые числа, выберите сумму и нажмите клавишу F9, чтобы отобразить новые результаты.
В таблице также можно использовать несколько формул. Например, можно сложить каждую строку чисел в правом столбце, а затем добавить эти результаты в нижней части столбца.
Другие формулы для таблиц
Word также содержит другие функции для таблиц. Рассмотрим AVERAGE и PRODUCT.
-
Щелкните ячейку таблицы, в которой вы хотите получить результат.
-
На вкладке Работа с таблицами | Макет щелкните Формула.
-
В поле Формула удалите формулу СУММ, но не удаляйте знак “равно” (=). Затем щелкните поле В этом поле и выберите функцию, которая вам нужна.
-
В круглых скобках укажите ячейки таблицы, которые необходимо включить в формулу.
Введите ABOVE, чтобы включить в формулу числа в столбце, расположенные выше выбранной ячейки, и нажмите кнопку ОК.
Введите LEFT, чтобы включить в формулу числа в строке, расположенные слева от выбранной ячейки, и нажмите кнопку ОК.
Введите BELOW, чтобы включить в формулу числа в столбце, расположенные ниже выбранной ячейки, и нажмите кнопку ОК.
Введите RIGHT, чтобы включить в формулу числа в строке, расположенные справа от выбранной ячейки, и нажмите кнопку ОК.
Например, чтобы вычислить среднее значение чисел в строке слева от ячейки, щелкните AVERAGE и введите LEFT:
=AVERAGE(LEFT)
Чтобы умножить два числа, щелкните PRODUCT и введите расположение ячеек таблицы:
=PRODUCT(ABOVE)
Совет: Чтобы включить в формулу определенный диапазон ячеек, вы должны выбрать конкретные ячейки. Представьте себе, что каждый столбец в вашей таблице содержит букву и каждая строка содержит номер, как в электронной таблице Microsoft Excel. Например, чтобы умножить числа из второго и третьего столбца во втором ряду, введите =PRODUCT(B2:C2).
С помощью команды Формула можно просуммировать числа в столбце или строке.
-
Щелкните ячейку таблицы, в которой вы хотите получить результат.
-
На вкладке Макет рядом с вкладкой Конструктор таблиц выберите формулу.
-
Проверьте данные в круглых скобках, чтобы убедиться в том, что Word содержит нужные ячейки для подсчета суммы.
Функция =SUM(ABOVE) складывает числа в столбце, расположенные над выбранной ячейкой.
Функция =SUM(LEFT) складывает числа в строке, расположенные слева от выбранной ячейки.
Функция =SUM(BELOW) складывает числа в столбце, расположенные под выбранной ячейкой.
Функция =SUM(RIGHT) складывает числа в строке, расположенные справа от выбранной ячейки.
Советы:
-
Изменив складываемые числа, выберите сумму и нажмите клавиши FN+F9, чтобы отобразить новые результаты.
-
В таблице можно использовать несколько формул. Например, можно сложить каждую строку чисел в правом столбце, а затем добавить эти результаты в нижней части столбца.
Другие формулы для таблиц
Word также содержит другие функции для таблиц. Рассмотрим AVERAGE и PRODUCT.
-
Щелкните ячейку таблицы, в которой вы хотите получить результат.
-
На вкладке Макет, расположенной рядом с вкладкой Конструктор таблиц, выберите команду Формула.
-
В поле Формула удалите формулу СУММ, но не удаляйте знак “равно” (=). Затем щелкните поле В этом поле и выберите функцию, которая вам нужна.
-
В круглых скобках укажите ячейки таблицы, которые необходимо включить в формулу.
Введите ABOVE, чтобы включить в формулу числа в столбце, расположенные выше выбранной ячейки.
Введите LEFT, чтобы включить в формулу числа в строке, расположенные слева от выбранной ячейки.
Введите BELOW, чтобы включить в формулу числа в столбце, расположенные ниже выбранной ячейки.
Введите RIGHT, чтобы включить в формулу числа в строке, расположенные справа от выбранной ячейки.
Например, чтобы вычислить среднее значение чисел в строке слева от ячейки, щелкните AVERAGE и введите LEFT:
=AVERAGE(LEFT)
Чтобы умножить два числа, щелкните PRODUCT и введите расположение ячеек таблицы:
=PRODUCT(ABOVE)
Совет: Чтобы включить в формулу определенный диапазон ячеек, вы должны выбрать конкретные ячейки. Представьте себе, что каждый столбец в вашей таблице содержит букву и каждая строка содержит номер, как в электронной таблице Microsoft Excel. Например, чтобы умножить числа из второго и третьего столбца во втором ряду, введите =PRODUCT(B2:C2).
Если вы знакомы с классическим приложением Word, то знаете, что с помощью формул можно выполнять такие вычисления, как сумму чисел в столбце или строке таблицы. Word в Интернете сохраняет формулы, которые уже есть в документе, но пока не дают возможность добавить их.
Если у вас есть настольная версия Word, используйте команду Открыть в Word, чтобы открыть документ в Word.
Затем следуйте инструкциям для классических версий Word. Когда вы сохраните документ, формула будет сохранена, когда вы откроете его в 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 поднатужится и вернёт убежавшую букву на место, а в мире снова воцарится мир. К слову, для наглядности «вписанный» текст будет подчёркиваться голубой линией.
А ещё, бывает, позаимствуешь чью-то таблицу и довольно напеваешь себе под нос: «Только ты, рыба моей мечты»! Хорошая работа чужими руками! Начинаешь заливать её своими данными, и тут происходит неконтролируемая чертовщина: одни столбцы расползаются за счёт похудения других. Голова отрезвляется, и реальность перестаёт радовать. Как быть?
Шутки шутками, но случается, что вам присылают таблицу строгого формата, с которой нельзя оплошать. Как минимум не поленитесь отправить её обратно с прежними размерами. Так получатель увидит то, что ожидает увидеть. А для этого отключите автоподбор размеров по содержимому.
Щёлкните в любой из ячеек правой клавишей мыши, выберите пункт «Свойства таблицы», перейдите к «Параметрам» и снимите галочку в графе «Автоподбор размеров по содержимому».
Эта же опция спасёт вашу таблицу от коллапса, если вам необходимо заполнить некоторые ячейки изображениями: они впишутся в виде миниатюры вместо полномасштабного размера.
Есть что добавить? Пишите в комментариях.