Символ перевода строки при сканировании в ворде

Программирование на Visual Basic for Applications
Calvin
Постоялец
Постоялец
 
Сообщения: 409
Зарегистрирован: 21.01.2003 (Вт) 12:13
Откуда: Sebastopol

Символ перевода строки при сканировании в ворде

Сообщение Calvin » 04.06.2008 (Ср) 18:01

Скажите плиз, как его убрать? Только не вручную....очень много...
-Whose the motocycle, is this? -It`s a chopper, baby! -Whose chopper is this? -Zed`s! -Who is Zed? -Zed`s dead, baby, Zed`s dead! :-D

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 05.06.2008 (Чт) 8:20

Replace?
Весь мир матрица, а мы в нем потоки байтов!

Calvin
Постоялец
Постоялец
 
Сообщения: 409
Зарегистрирован: 21.01.2003 (Вт) 12:13
Откуда: Sebastopol

Сообщение Calvin » 05.06.2008 (Чт) 10:14

Можно поподробнее? Если бы это был обычный символ перевода строки, то я бы заменил.....а ккакой код этого символа?
-Whose the motocycle, is this? -It`s a chopper, baby! -Whose chopper is this? -Zed`s! -Who is Zed? -Zed`s dead, baby, Zed`s dead! :-D

Paul Z
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 19
Зарегистрирован: 03.09.2003 (Ср) 11:53

Сообщение Paul Z » 09.06.2008 (Пн) 12:41

Function ClStr(sl As String) As String
ClStr = Trim(sl)
ClStr = Replace(ClStr, Chr(13), "")
ClStr = Replace(ClStr, Chr(10), "")
ClStr = Replace(ClStr, Chr(7), "")
End Function

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 09.06.2008 (Пн) 13:07

Paul Z, а знаешь ли ты, что эта функция делает?
Lasciate ogni speranza, voi ch'entrate.

Paul Z
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 19
Зарегистрирован: 03.09.2003 (Ср) 11:53

Сообщение Paul Z » 09.06.2008 (Пн) 13:44

Ну ежели я ее привел в качестве примера, то, наверное, я ей пользуюсь :D
Да еще бывает полезно выкинуть chr(11)

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 09.06.2008 (Пн) 14:10

А ты знаешь, что случиться с текстом, если ты выкинешь из него все переводы строк, не поставив вместо них хотя бы пробел?
Lasciate ogni speranza, voi ch'entrate.

Paul Z
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 19
Зарегистрирован: 03.09.2003 (Ср) 11:53

Сообщение Paul Z » 09.06.2008 (Пн) 14:14

Так применять надо по назначению, а не тупо скопировав код. Для текста в целом это вредно, согласен, для ячеек внутри таблицы, как показывает практика - вещь незаменимая. я так думаю.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 09.06.2008 (Пн) 18:28

Paul Z, а где-то была речь про таблицы?
Весь мир матрица, а мы в нем потоки байтов!

Paul Z
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 19
Зарегистрирован: 03.09.2003 (Ср) 11:53

Сообщение Paul Z » 09.06.2008 (Пн) 20:01

А где-то была речь про голый текст ???
"Символ перевода строки при сканировании в ворде"
Пора по-моему тему закрывать :!:

Денис
Доктор VB наук
Доктор VB наук
Аватара пользователя
 
Сообщения: 2734
Зарегистрирован: 07.11.2006 (Вт) 13:55
Откуда: Ейск, Краснодарский край

Сообщение Денис » 10.06.2008 (Вт) 8:46

Calvin
Посмотри на картинку. И вба не нужен...
Вложения
buf1.png
Выбранное значение подставится в поле "Найти" а в поле заменить поставишь свой символ, пробел или точку, что надо.
buf1.png (21.43 Кб) Просмотров: 1700
Программирование — богоизбранная дисциплина! Если бог и есть, то вселенную он скомпилировал, не иначе.

Calvin
Постоялец
Постоялец
 
Сообщения: 409
Зарегистрирован: 21.01.2003 (Вт) 12:13
Откуда: Sebastopol

Сообщение Calvin » 11.06.2008 (Ср) 10:32

СПАСИИИБООООООО
-Whose the motocycle, is this? -It`s a chopper, baby! -Whose chopper is this? -Zed`s! -Who is Zed? -Zed`s dead, baby, Zed`s dead! :-D


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 111

    TopList  
cron