powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Форматирование текста
7 сообщений из 7, страница 1 из 1
Форматирование текста
    #37504349
Valhalla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите пожалуйста, как с помощью VBA в MS Word 2007 сделать макрос, который форматирует текст именно в первом абзаце документа . И в Excel посчитать количество листов в книге?
...
Рейтинг: 0 / 0
Форматирование текста
    #37504487
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1) обрабатывать элемент №1 коллекции абзацев
2) посмотреть счетчик в коллекции листов

Преподаватель на дом задал?
...
Рейтинг: 0 / 0
Форматирование текста
    #37505924
Valhalla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Такой код отказывается работать

Код: plaintext
1.
2.
3.
4.
5.
Sub ФорматированиеТекста()
Paragraphs( 1 ).Select
Selection.Font.Bold = wdToggle
Selection.Font.Italic = wdToggle
Selection.Font.Color = - 553582593 
End Sub

Что не правильно??? (Excel 2007) Вот такая ошибка:
[img] http://img.megatorrents.kz/graphic/images/2011/October/31/D92E_4EAECDEA.jpg [/img]
...
Рейтинг: 0 / 0
Форматирование текста
    #37506073
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ValhallaЧто не правильно???и тут же сам дал ответValhallaExcel

причем тут эксель?
...
Рейтинг: 0 / 0
Форматирование текста
    #37506186
Valhalla
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Извините тупанул это в Word 2007
...
Рейтинг: 0 / 0
Форматирование текста
    #37506203
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
Sub ФорматированиеТекста()
Paragraphs( 1 ).Range.Select
Selection.Font.Bold = wdToggle
Selection.Font.Italic = wdToggle
Selection.Font.Color =  255 
End Sub
...
Рейтинг: 0 / 0
Форматирование текста
    #37506204
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
но если не стоит цель выделить абзац, то лучше так:
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub ФорматированиеТекста()
With Paragraphs( 1 ).Range
.Font.Bold = wdToggle
.Font.Italic = wdToggle
.Font.Color =  255 
End With
End Sub
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Форматирование текста
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]