Удаление символа в строках VBA
Я пытался придумать, как отформатировать номера SSN наших клиентов в таблице Excel, чтобы убрать все "-".
пример: 123-45-6789 превращается в 123456789
Все мои другие источники потерпели неудачу, и я не нашел здесь ничего, что могло бы мне помочь.
редактировать: мне нужно это будет работать на весь столбец
1 ответ
Решение
Выберите ячейки, которые вы хотите обработать, и запустите этот короткий макрос:
Sub Ken()
Dim r As Range, v As String
For Each r In Intersect(Selection, ActiveSheet.UsedRange)
v = r.Text
If v <> "" Then
r.NumberFormat = "@"
r.Value = Replace(v, "-", "")
End If
Next r
End Sub