Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Replace и знаки подстановки
 
#1
26.05.2011 10:12:26
В справке по функции Replace отсутствует явное указание на возможность (невозможность) использования в качестве аргумента Find подстановочных знаков.  
Практические попытки (- не пытки)положительного ответа не дали.  
Следует ли утешиться известной фразой, что отрицательный результат тоже результат?  
Или такая возможность есть?  
s = "$J$10,$J$14,$J$21,$J$27,$J$29,$J$32"  
r = Replace(s, "?", "") 'не работает  
r = Replace(s, "*", "") 'не работает  
r = Replace(s, "[ABCDEFGHIJKLMNOPQRSTUVWXYZ]", "") 'не работает
Была мысль, как Чапаев рубануть с плеча, обойтись без циклов. Но видимо как и он не доплыву до берега:(
 
 
 
#2
26.05.2011 10:16:53
для * и ? возможность есть - используйте WorksheetFunction.Substitute  
маски вида [abcd] можно использовать только в операторе Like
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#3
26.05.2011 10:21:33
{quote}{login=ikki}{date=26.05.2011 10:16}{thema=}{post}для * и ? возможность есть - используйте WorksheetFunction.Substitute  
маски вида [abcd] можно использовать только в операторе Like{/post}{/quote}
 
можно вместо ? и * chrw(63) и chrw(42) использовать, как вариант...
 
 
 
#4
26.05.2011 10:23:03
таким же образом через цикл можно и буквы алфавита... как вариант :)
 
 
 
#5
26.05.2011 10:47:29
r = WorksheetFunction.Substitute(s, "$", "") 'работает но это не знак подстановки  
r = WorksheetFunction.Substitute(s, "$?", "") 'не работает  
r = WorksheetFunction.Substitute(s, "?", "") 'не работает  
r = WorksheetFunction.Substitute(s, "*", "") 'не работает  
r = WorksheetFunction.Substitute(s, "$*", "") 'не работает  
re: Диана. Циклом не по Чапаевски.  
r = WorksheetFunction.Substitute(s, ChrW(42), "")  'не работает  
re: The_Prist. Погружаюсь в RegExp.
 
 
 
#6
26.05.2011 10:57:34
{quote}{login=k61}{date=26.05.2011 10:47}{thema=re: ikki}{post}r = WorksheetFunction.Substitute(s, "$", "") 'работает но это не знак подстановки  
r = WorksheetFunction.Substitute(s, "$?", "") 'не работает  
r = WorksheetFunction.Substitute(s, "?", "") 'не работает  
r = WorksheetFunction.Substitute(s, "*", "") 'не работает  
r = WorksheetFunction.Substitute(s, "$*", "") 'не работает  
re: Диана. Циклом не по Чапаевски.  
r = WorksheetFunction.Substitute(s, ChrW(42), "")  'не работает  
re: The_Prist. Погружаюсь в RegExp.{/post}{/quote}  
 
s = replace(s, chrw(43), "")
 
 
 
#7
26.05.2011 10:58:24
42 т.е., сорри
 
 
 
#8
26.05.2011 11:07:52
r = Replace(s, ChrW(42), "") 'не работает
 
 
 
#9
26.05.2011 11:11:46
А как должно бы сработать со звёздочкой? Например,  
r = Replace("Вася", "*", "")  
КАКОЙ символ менять? :-)
 
 
 
#10
26.05.2011 11:20:53
работает, не работает, если там нет звездочки.
 
 
 
#11
26.05.2011 11:30:23
Сорри, ошиблась :)
 
 
 
#12
26.05.2011 11:36:07
мда...  
The_Prist абсолютно прав.  
а я с Word'ом, что ли, попутал... :(  
или таки с ПОИСК()
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#13
26.05.2011 11:38:09
кстати, тоже надо бы изучить RegExp.  
вот, натолкнулся на неплохую коллекцию готовых паттернов: http://www.regexlib.com/DisplayPatterns.aspx  
 
или где-нибудь ещё больше и лучше есть? :)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#14
27.05.2011 02:31:47
{quote}{login=Юрий М}{date=26.05.2011 11:11}{thema=}{post}А как должно бы сработать со звёздочкой? Например,  
r = Replace("Вася", "*", "")  
КАКОЙ символ менять? :-){/post}{/quote}  
В Вашем примере менять все символы.  
Но Ваш пример не отражает конкретной потребности оставить в переменной только числа.
 
 
 
#15
27.05.2011 04:11:08
Объект RegExp - всемогущ!  
Добавил его изучение в список дел которые должен сделать каждый мужчина в течении жизни (посадить печень, построить тёщу, вырастить пузо).  
Стою на пороге открытия.  
Прошу не расходиться. После посадки картошки, поделюсь.
 
 
 
Страницы: 1
Читают тему
Наверх