Замена в подстроки в Excel / HTML, JavaScript, VBScript, CSS

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Замена в подстроки в Excel

4 сообщений из 4, страница 1 из 1

Замена в подстроки в Excel

#35184436

golsa

Участник

Откуда: Красноярск

Сообщения: 789

Рейтинг: 0 / 0

Средствами VBScript надо обработать Excel табличку.
Не получается сделать замену подстроки на другую.
В лучшем случае не ругается, но ничего не меняется.
Вот кусок кода, в которым пытаюсь в ячейках C12:C20 заменить слово Заместитель на слово Зам. :

Код: plaintext

1.
2.
3.
4.
5.
6.

Dim oXL 
Set oXL = WScript.CreateObject("Excel.Application")
oXL.Visible = True            
WorkPath = Left(WScript.ScriptFullName, InSTR(WScript.ScriptFullName,WScript.ScriptName)- 1 )
oXL.WorkBooks.Add(WorkPath & "RashVd.xls") 
oXL.Range("C12:C20").Replace What="Заместитель ", Replacement="Зам."

Подскажите в чем ошибка? Почему не заменяет? В указанном диапазоне одна из ячеек содержит текст: Заместитель Председателя .

...

Рейтинг:

0 / 0

12.03.2008, 11:17

| Ответить | Цитировать | Написать

Замена в подстроки в Excel

#35185808

Ex_Soft

Участник

Сообщения: 7 930

Рейтинг: 0 / 0

тынць
_________________
"Helo, word!" - 17 errors 56 warnings
Posted via ActualForum NNTP Server 1.4

...

Рейтинг:

0 / 0

12.03.2008, 16:58

| Ответить | Цитировать | Написать

Замена в подстроки в Excel

#35186604

big-duke

Участник

Сообщения: 6 245

Рейтинг: 0 / 0

Попробуйте без именованных параметров.
Какая ошибка возникает ?
Попробуйте открыть книгу в экселе и выполнить Range("C12:C20").Replace What="Заместитель ", Replacement="Зам."

...

Рейтинг:

0 / 0

12.03.2008, 22:40

| Ответить | Цитировать | Написать

Замена в подстроки в Excel

#35186843

golsa

Участник

Откуда: Красноярск

Сообщения: 789

Рейтинг: 0 / 0

2 Ex_Soft
Фичу с записями макроса я знаю и использую. В результате макроса получается такая строка:

Код: plaintext

Range("C12:C20").Replace What:='Заместитель ', Replacement:='Зам.', LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:=False

Но этот оператор выдает ошибку Предполагается наличие инструкции пока не заменишь ' на " и не уберешь символы : .

2 big-duke
Спасибо, вариант

Код: plaintext

Range("C12:C20").Replace 'Заместитель ', 'Зам.'

заработал

...

Рейтинг:

0 / 0

13.03.2008, 08:21

| Ответить | Цитировать | Написать

4 сообщений из 4, страница 1 из 1

Форумы / HTML, JavaScript, VBScript, CSS [игнор отключен] [закрыт для гостей] / Замена в подстроки в Excel

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=22&fpage=343&tid=1456792]:	0ms
get settings:	9ms
get forum list:	17ms
check forum access:	3ms
check topic access:	3ms
track hit:	41ms
get topic data:	12ms
get forum data:	3ms
get page messages:	55ms
get tp. blocked users:	1ms
others:	246ms

total:	390ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы