Meri

Как из VB поменять ориентацию страницы в Word?

30.09.2007, 17:10. Показов 8833. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите! Как из VB поменять ориентацию страницы в Ворде?
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
30.09.2007, 17:10
Ответы с готовыми решениями:

Как при печати поменять ориентацию страницы (на landscape)?
Kak pri pe4ati pomenjat' orijentaciju strinicy (na landscape)? Nuschno raspe4atyvat' formu, a ona na vertikal'nyj list ne...

Как в word у одной страницы документа сделать альбомную ориентацию, чтобы у всех остальных оставалась книжная?
Как в ворде у одной страницы документа сделать альбомную ориентацию, чтобы у всех остальных оставалась книжная?

QPrintPreviewDialog - как задать альбомную ориентацию страницы?
Всем привет. Делаю вывод отчета перед печатью Использую QWebView и QPrintPreviewDialog При открытии диалога страница в...

10
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
30.09.2007, 17:17
ActiveDocument.PageSetup.Orientation = wdOrientLandscape

или

ActiveDocument.PageSetup.Orientation = wdOrientPortrait
0
Meri
01.10.2007, 17:34
Спасибо за ответ.
Но тут возникла ещё одна проблема, не могу поменять положение курсора из VB. Если не трудно подскажите пожалуйста.
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
01.10.2007, 19:19
Подробнее, какого курсора и где ?
0
Meri
02.10.2007, 10:33
Курсор в документе Word.
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
02.10.2007, 10:56
Примерно так

Selection.MoveDown Unit:=wdLine, Count:=3
Selection.MoveRight Unit:=wdCharacter, Count:=12
0
Meri
02.10.2007, 11:16
Спасибо за подсказку. Все замечательно работает, но у меня в Ворде создается таблица которая ни как не хочет перемещаться в нужное положение, а создается всегда в начале документа, я думал это лечится положением курсора, куда поставишь, там и будет создаваться таблица , однако это почему-то не работает.HELP!!!
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
02.10.2007, 12:18
Для того чтобы таблица опустилась ниже начала документа можно набить вначале переводы строки

Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
'создание таблицы
ActiveDocument.Tables.Add _
Range:=Selection.Range, _
NumRows:=3, NumColumns:=3
...
0
Meri
02.10.2007, 12:47
Спасибо за ценные советы, теперь работает как надо.
Meri
02.10.2007, 12:55
Слушай, AndreP, а ты случайно не знаешь как программно добавить колонтитулы?
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
02.10.2007, 13:09
Ответ на все подобные вопросы сразу (уже раз пять про это здесь писал, почему до самих начинающих VBA программистов это не до ходит):
выбрать Tools / Macro / Record New Macros...
произвести нужные действия, остановить запись, посмотреть, что создал Word в записанном макросе.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
02.10.2007, 13:09
Помогаю со студенческими работами здесь

Программно поменять ориентацию репорта
В эксссцессе 2000 ВБ примочки не работают. DataReportInvoice.Orientation = rptOrientLandscape КАк установить? А также проблема с...

Где можно выбрать ориентацию листа в word 2007
Здравствуйте. Если открыть параметры страницы Excel в 2007 , то можно видеть на вкладке , где выбор ориентация альбомная или нет...

Программно поменять ориентацию формы Orientations
Как программно привизать форме ориентацию ? Orientations такое не работает :( TabbedwithNavigationForm.FormFactor.Orientations:=;

Как пронумеровать страницы в Word 2007 начиная с 4 страницы
Как пронумеровать страницы в 2007 начиная с 4 страницы,а что бы первая,вторая и третья не нумеровались.

Если поменять ориентацию экрана или SurfaceView перекроет другой активити, то приложение завершается аварийно
Здравствуйте уважаемые программисты! Недавно начал изучать проигрывание видео под android. Получилось вывести видео на экран при помощи...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Опции темы

Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru