Как писать в ворде вертикально в таблице
Перейти к содержимому

Как писать в ворде вертикально в таблице

Информатика в экономике и управлении

Свободное программное обеспечение для бизнеса и дома.

Страницы блога

среда, 8 января 2014 г.

Поворот текста вертикально в таблице LibreOffice Writer

Часто встречается вопрос о повороте текста в таблице LibreOffice Writer. Связано это, наверное, с тем, что не совсем логично определено место этой функции в Writer, и из-за этого её найти достаточно тяжело. Очень короткая заметка для разъяснения ситуации.

Для примера с поворотом текста откроем LiberOffice Writer и создаём таблицу с одной строкой и тремя столбцами. Для наглядности в левом столбце напишем «Я повернут на 90°», в центральном «Я повернут на 0°», и правом «Я повернут на 270°».

Поворот текста влево

Далее можно выделить левый столбец, если вам нужно повернуть текст во всех ячейках столбца таблицы или просто текст в одной ячейке, если вам нужно повернуть текст только в этой ячейке таблицы. В меню выбираем «Формат» → «Символы. » и в открывшемся окне переходим на вкладку «Положение». В разделе «вращение/масштабирование» выбираем «90 градусов» и нажимаем «Да». Текст в левой колонке таблицы повернется так что, что бы прочитать его нужно будет наклонить голову в лево.

Поворот текста в право

Выделим текст в правой колонке. В меню выбираем «Формат» → «Символы. » и в открывшемся окне переходим на вкладку «Положение». В разделе «вращение/масштабирование» выбираем «270 градусов» и нажимаем «Да». Текст в правой колонке таблицы будет повернут так что, что бы причитать его нужно будет наклонить голову в право.

На скриншоте можно видеть результат манипуляций: в левой ячейке текст повернут влево, в правой ячейке текст повернут в право. Я добавил выравнивание («Формат» → «Выравнивание»), что бы таблица смотрелась немного красивее.

Источник:

Дополнительная информация:

как написать текст горизонтально в ВОРДЕ ( В ТАБЛИЦЕ)!?

Вообще-то текст в ворде пишется горизонтально по умолчанию. Может имелось введу вертикально? Если да, то наводим курсор мыши на ячейку и кликаем правую кнопку мыши, в открывшемся меню выбираем пункт «Направление текста» и меняем до нужного варианта. Эта же функция есть на панельке «Таблица и границы» в виде кнопочки с буквой «А» и стрелочками.

Х)) ) Там просто. У тебя таблица с вертикальной ориентацией, меняешь её и вуаля , (направление текста) или нажми F1

[Закрыто] (Решено) Вертикальное центрирование таблицы

Здравствуйте, можете ли вы мне подсказать про то как отцентрировать таблицы в документе по вертикали. Есть документ в котором довольно много таблиц, по одной на странице, все одного формата, т.е. 2 столбца, 7 строк. Нужно что бы они были по центру страницы.

хм..И тогда сразу второй вопрос, документ с одной большой таблицей, реально ли сделать что бы на странице было по 7 строк таблицы а, их содержимое форматировалось по центру? или что бы автоматически разбивалась таблица на таблицы по 7 строк? а после центровалась как в первом вопросе?

2 Ответ от andrkar 10.04.2010 15:59:47

Re: (Решено) Вертикальное центрирование таблицы

Я вижу такой вариант (если все таблицы абсолютно одинаковые) — расчитать высоту таблицы складываем высот строк таблицы, а потом в параметрах страницы выставить отступ сверху равный половине разницы между высотой страницы и высотой таблицы. Но этот вариант будет работать, если кроме таблиц ничего на странице нет.
Затем у каждой строки кратной восьми выставляйте у абзаца флаг «Начать с новой страницы». Вот такой вот простой алгоритм..

3 Ответ от vangor 10.04.2010 20:34:15

Re: (Решено) Вертикальное центрирование таблицы

andrkar пишет:

Я вижу такой вариант (если все таблицы абсолютно одинаковые) — расчитать высоту таблицы складываем высот строк таблицы, а потом в параметрах страницы выставить отступ сверху равный половине разницы между высотой страницы и высотой таблицы. Но этот вариант будет работать, если кроме таблиц ничего на странице нет.
Затем у каждой строки кратной восьми выставляйте у абзаца флаг «Начать с новой страницы». Вот такой вот простой алгоритм..

А вы можете написать макрос? Я к сожалению не могу сам.

4 Ответ от Вождь 11.04.2010 00:46:49

Re: (Решено) Вертикальное центрирование таблицы

Еще можно использовать инструменты Word, в которых возможно вертикальное центрирование.
Например, поместить таблицу в таблицу. Т.е. создаем таблицу с одной ячейкой по размеру страницы, в ячейке задаем выравнивание по вертикали и помещаем в нее свою таблицу, текст, да что угодно…

Макросы под заказ и готовый пакет — mtdmacro.ru

5 Ответ от vangor 11.04.2010 15:31:25

Re: (Решено) Вертикальное центрирование таблицы

Значит средствами макросов нереально сделать что бы таблица автоматически разбивалась на таблички по 8 строк? и что бы шла проверка о наличии на странице только одной таблицы?
Потому что вариант о таблице в таблице к сожалению не подойдет.

6 Ответ от Вождь 11.04.2010 17:39:56

Re: (Решено) Вертикальное центрирование таблицы

vangor пишет:

. вариант о таблице в таблице к сожалению не подойдет.

Почему не подойдет? Ведь, как вы пишите, таблицу надо разбить на части.

Тогда, еще один довольно удобный вариант – это использовать связанные надписи. Т.е. помещаем на каждой странице надпись, связываем надписи между собой и вставляем в первую надпись таблицу. Что удобно: надписи могут быть любой высоты (под любое число строк таблицы) и могут размещаться в любом месте страницы (по центру, например). Кроме того, не нарушается целостность таблицы, что удобно для редактирования.

Макросы под заказ и готовый пакет — mtdmacro.ru

7 Ответ от Вождь 11.04.2010 17:53:09

Re: (Решено) Вертикальное центрирование таблицы

Только что выключил дурака. Вот мы намудрили
А достаточно просто ВЫСТАВИТЬ ВЕРХНЕЕ И НИЖНЕЕ ПОЛЯ СТРАНИЦЫ ПОБОЛЬШЕ, чтобы таблица была по центру и нужной высоты

Макросы под заказ и готовый пакет — mtdmacro.ru

8 Ответ от andrkar 11.04.2010 17:58:44

Re: (Решено) Вертикальное центрирование таблицы

Вождь — примерно про то же самое я говорил выше:)
vangor — так 8 или семь строк? или восьмая — заголовок?

9 Ответ от vangor 11.04.2010 19:07:39

Re: (Решено) Вертикальное центрирование таблицы

andrkar пишет:

Вождь — примерно про то же самое я говорил выше:)
vangor — так 8 или семь строк? или восьмая — заголовок?

да да по 7) извините за дезу)

10 Ответ от andrkar 12.04.2010 03:44:35

Re: (Решено) Вертикальное центрирование таблицы

Да, и еще для информации — критично ли для вас, если выставить высоту всех строк равной какому-то число, например — 1 см? или в строках таблицы может быть по нескольку строк текста?? Просто это нужно для расчета высоты таблицы..

11 Ответ от vangor 12.04.2010 10:19:08

Re: (Решено) Вертикальное центрирование таблицы

Структура таблицы такая — 1 строка- заголовок 1 страницы, 2 стока заголовок для 3 строки, 3 строка обе ячейки, два рисунка в каждой. 4 строка такая же как вторая и т.д.

12 Ответ от andrkar 12.04.2010 12:13:19

Re: (Решено) Вертикальное центрирование таблицы

Можете сюда выложить пример? код я уже написал, осталось его мне вашу ситуацию приспособить:)

13 Ответ от viter.alex 12.04.2010 12:31:57

Re: (Решено) Вертикальное центрирование таблицы

А может это сделать не таблицами, а надписями?

Лучше день потерять — потом за пять минут долететь!

14 Ответ от andrkar 12.04.2010 17:19:05

Re: (Решено) Вертикальное центрирование таблицы

вот, пока было время, наваял такой код:

Sub tabl_7() On Error Resume Next Dim i As Integer Dim j As Integer Dim RowsCount As Integer Dim TablesCount As Integer Dim tableFHeight As Single Dim RowHeight As Single Dim PageHeight As Single Dim PageTopMargin As Single Dim PageBottomMargin As Single Dim TH As Single RowsCount = ActiveDocument.Tables(1).Rows.Count TablesCount = RowsCount / 7 For i = 1 To TablesCount Selection.GoTo What:=wdGoToTable, Which:=wdGoToFirst, Count:=i, name:="" ActiveDocument.Tables(i).Split (8) Selection.ParagraphFormat.PageBreakBefore = True Next i ' Selection.GoTo What:=wdGoToTable, Which:=wdGoToFirst, Count:=1, name:="" ' Selection.Tables(1).Select ' Selection.Rows.HeightRule = wdRowHeightAtLeast ' Selection.Rows.Height = CentimetersToPoints(0.5) ' Selection.GoTo What:=wdGoToTable, Which:=wdGoToFirst, Count:=i, name:="" ' TH = 0 ' For j = 1 To 7 ' TH = Selection.Rows.Height + TH ' Selection.MoveDown Unit:=wdLine, Count:=1 ' Next j ' With ActiveDocument.Sections(1).PageSetup ' Задание параметров страницы по требованиям ГОСТ 2.105 ' PageHeight = .PageHeight ' PageTopMargin = (PageHeight - TH) / 2 ' .TopMargin = PageTopMargin ' Отступ от верхнего края страницы ' End With End Sub

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

15 Ответ от vangor 12.04.2010 19:30:18

Re: (Решено) Вертикальное центрирование таблицы

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

Отредактировано vangor (12.04.2010 19:30:58)

Post’s attachments

1-кадет.doc 1.9 Мб, 13 скачиваний с 2010-04-12

You don’t have the permssions to download the attachments of this post.

Microsoft Excel и Word 2013: учиться никогда не поздно

Эта книга посвящена новым версиям Microsoft Word и Excel 2013. Она предназначена для тех, кто хочет научиться работать в этих популярных многофункциональных программах. В ней нет сложных определений и заумных терминов. Большое количество иллюстраций делает процесс обучения максимально наглядным, а практические примеры значительно ускоряют освоение материала. Прочитав ее, вы поймете, что большой жизненный опыт не препятствие для освоения компьютерных программ. Главное — желание и уверенность в своих силах. Ведь не зря говорят, что учиться никогда не поздно!

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *