Как убрать лишние знаки в excel
Автор Киберпанк задал вопрос в разделе Программное обеспечение
Программа EXCEL, оставить необходимые знаки, остальные убрать? и получил лучший ответ
Ответ от Вика Рудковская[мастер]
Если нужно найти только часть строки до первого знака "-", то можно использовать 2 функции: НАЙТИ и ЛЕВСИМВ:
Ответ от Abram Pupkin[гуру]
то же самое что написала Вика, только все в одом флаконе
=ЛЕВСИМВ (A1;ПОИСК ("-";A1)-1)
P.S.
При выборе ЛО - у дамы преимущество (она ответила первая )
то же самое что написала Вика, только все в одом флаконе
=ЛЕВСИМВ (A1;ПОИСК ("-";A1)-1)
P.S.
При выборе ЛО - у дамы преимущество (она ответила первая )
Ответ от Алексей Матевосов (AlexM)[гуру]
Два предыдущих варианта решают задачу формулами.
Для первого требуется дополнительных два столбца, а для другого один.
Предлагаю вариант с макросом. Дополнительных столбцов не требуется. При большом количестве ячеек макрос задачу выполнит на порядок быстрее и вписать его быстрее, чем формулы.
Код
Sub Macros()
Set objRegExp = CreateObject("VBScript.RegExp")
objRegExp.Pattern = "-[-a-zA-Z0-9]+$"
objRegExp.IgnoreCase = True
For Each cell In Selection
l = objRegExp.Test(cell.Value)
cell.Value = objRegExp.Replace(cell.Value, "")
Next
End Sub
Макрос вставить в Модуль1 проекта VBA/
Выделить ячейки, в которых надо убрать часть, начиная с первого "-"
Запустить макрос.
Два предыдущих варианта решают задачу формулами.
Для первого требуется дополнительных два столбца, а для другого один.
Предлагаю вариант с макросом. Дополнительных столбцов не требуется. При большом количестве ячеек макрос задачу выполнит на порядок быстрее и вписать его быстрее, чем формулы.
Код
Sub Macros()
Set objRegExp = CreateObject("VBScript.RegExp")
objRegExp.Pattern = "-[-a-zA-Z0-9]+$"
objRegExp.IgnoreCase = True
For Each cell In Selection
l = objRegExp.Test(cell.Value)
cell.Value = objRegExp.Replace(cell.Value, "")
Next
End Sub
Макрос вставить в Модуль1 проекта VBA/
Выделить ячейки, в которых надо убрать часть, начиная с первого "-"
Запустить макрос.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Программа EXCEL, оставить необходимые знаки, остальные убрать?