Как сделать через макрос что бы данные вида:
Разъем SIM и SD карты Samsung Galaxy A3 A310, Galaxy A5 A510, Galaxy A7 A710, Galaxy J3 J330, Galaxy J5 J530, Galaxy J7 J730, оригинал
были автоматом написаны Разъем-SIM-и-SD-карты-Samsung-Galaxy-A3-A310-Galaxy-A5-A510-Galaxy-A7-A710-Galaxy-J3-J330-Galaxy-J5-J530-Galaxy-J7-J730-оригинал
То есть пробелы заменены на "-" и без недопустимых символов " ""~!@/\#$%^&*=|()`.,"
вот нашел макрос но незнаю как подправить(((
Хочу еще купить Надстройку PLEX там реализовано ли это? впрочем она и так подходит мне для моих задач... но как всегда хочется ВСЕ и сразу.
Разъем SIM и SD карты Samsung Galaxy A3 A310, Galaxy A5 A510, Galaxy A7 A710, Galaxy J3 J330, Galaxy J5 J530, Galaxy J7 J730, оригинал
были автоматом написаны Разъем-SIM-и-SD-карты-Samsung-Galaxy-A3-A310-Galaxy-A5-A510-Galaxy-A7-A710-Galaxy-J3-J330-Galaxy-J5-J530-Galaxy-J7-J730-оригинал
То есть пробелы заменены на "-" и без недопустимых символов " ""~!@/\#$%^&*=|()`.,"
вот нашел макрос но незнаю как подправить(((
Хочу еще купить Надстройку PLEX там реализовано ли это? впрочем она и так подходит мне для моих задач... но как всегда хочется ВСЕ и сразу.
| Код |
|---|
Function Replace_symbols(ByVal txt As String) As String St$ = "~!@/\#$%^&*=|()`""" For i% = 1 To Len(St$) txt = Replace(txt, Mid(St$, i, 1), "-") Next Replace_symbols = txt End Function |
Изменено: - 30.10.2017 19:44:24
