 |
Форум Приднестровья, приднестровский форум свободного общения! Новости ПМР,
погода в Тирасполе,
курс валют ПМР,
маршруты ПМР
Регистрация |
Правила форума | Справка |
Сообщество |
Календарь |
Сообщения сегодня |
Сообщения за неделю |
≥ Поиск ≤ |
|
|||||||
| Программисты и компьютеры в ПМР - Небольшой клуб для программистов и всех, кому интересны компьютеры и всё, что с ними связано. |
word 2003 - подстановочные знаки
|
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
10.01.2013, 17:53
|
|
|
Администратор
Детали профиля (+/-)
Ответов: 42,891
Регистрация: 12.05.2008
Адрес: Тирасполь
Спасибо:4,698/5,005
Не понравилось:136/374
Репутация:
 |
Решение вижу примерно такое на VBA
Sub Макрос1() ' ' Макрос1 Макрос ' Макрос записан 09.01.2013 ' Application.Browser.Previous Dim i As Long For i = 1 To Documents(1).Paragraphs.Count строка = ActiveDocument.Paragraphs(i).Range.Text длина = Len(строка) If длина < 30 Then строка = "0" End If Next End Sub
________________
Судьба - совокупность совершенных глупостей человека. Любите и принимайте людей такими, какие они есть. Если Вас оскорбили - нажимаем "Пожаловаться на это сообщение"  слева от поста под аватаром хама.
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Разделы | Ответы | Последний ответ |
| Знаки зодиака | optimist | Психология | 8 | 01.05.2015 21:52 |
| Продам Golf lV 1.6, 2003 года, купе СВЕЖЕПРИГНАННЫЙ!! | kissyulka | Продам | 17 | 23.02.2011 18:46 |
| Товарные знаки в ПМР | PMR | Юридическая помощь в ПМР | 0 | 12.10.2008 12:09 |
Комбинированный вид
|
|
|||||||
Текущее время: 07:10. Часовой пояс GMT +2.