| Вопрос: Замена текста в документе Word | Добавлено: 26.07.07 10:54 |
Автор вопроса:  Vitalysan®
|
|
Мне надо заменить строку
"Привет" на "Привет Привет" (т.е. заменить одну строку на две с переносом). Что vbCrlf, что ChrW$(10) & ChrW$(13), что vbNewLine Word "не понимает". Пишет "квадратики". Как же реализовать замену? |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа: Vitalysan® Вопросов: 25 Ответов: 61 |
Профиль | | #1 | Добавлено: 26.07.07 11:25 |
|
Уже нашёл один способ:
надо заменить ChrW$(10) на vbNullString А может другой способ есть или я чего не так делаю? |
||
|
Номер ответа: 2 Автор ответа:  bi-lya Вопросов: 1 Ответов: 125 |
Профиль | | #2 | Добавлено: 26.07.07 16:13 |
|
Можно через Selection Selection.Text = "Привет" & Chr(13) & "Привет"
Но правильно - задать Range Dim r As Range
Set r = ActiveDocument.Range(...) r.Text = "Привет" & Chr(13) & "Привет" |
||
|
Номер ответа: 3 Автор ответа: bi-lyaВопросов: 1 Ответов: 125 |
Профиль | | #3 | Добавлено: 26.07.07 16:19 |
|
Или так (по условию правильнее, наверное)
Selection.Text = Selection.Text & Chr(13) & "Привет"
r.Text = r.Text & Chr(13) & "Привет" |
||
|
Номер ответа: 4 Автор ответа: Vitalysan®Вопросов: 25 Ответов: 61 |
Профиль | | #4 | Добавлено: 26.07.07 23:32 |
| Спасибо! Ответ исчерпывающий, тема закрыта. | ||
Страница: 1 |