Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Форматирование текста / 7 сообщений из 7, страница 1 из 1
30.10.2011, 15:07
    #37504349
Valhalla
Valhalla
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Форматирование текста
Подскажите пожалуйста, как с помощью VBA в MS Word 2007 сделать макрос, который форматирует текст именно в первом абзаце документа . И в Excel посчитать количество листов в книге?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.10.2011, 18:38
    #37504487
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Форматирование текста
1) обрабатывать элемент №1 коллекции абзацев
2) посмотреть счетчик в коллекции листов

Преподаватель на дом задал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.10.2011, 20:34
    #37505924
Valhalla
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
| Ответить | Цитировать | Написать  
31.10.2011, 23:49
    #37506073
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Форматирование текста
ValhallaЧто не правильно???и тут же сам дал ответValhallaExcel

причем тут эксель?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.11.2011, 07:52
    #37506186
Valhalla
Valhalla
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Форматирование текста
Извините тупанул это в Word 2007
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.11.2011, 08:45
    #37506203
Shocker.Pro
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
| Ответить | Цитировать | Написать  
01.11.2011, 08:47
    #37506204
Shocker.Pro
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
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Форматирование текста / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 524ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2158337]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 61ms
get topic data:
 13ms
get forum data:
 2ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 376ms
total:  524ms
x
x
Закрыть


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