Как быстро удалить тире из ячеек в Excel?

Предположим, у вас есть список почтовых индексов или длинных ISBN-номеров в ячейках вашего рабочего листа, и эти длинные номера содержат тире. Для какой-то цели вам нужно избавиться от тире между цифрами (как показано на следующих скриншотах). Есть ли быстрые способы удалить эти тире между числами в Excel?

Удаление тире из ячеек с помощью формулы
Легко удалить тире из ячеек с помощью Kutools для Excel
Удаление тире из ячеек с помощью кода VBA

Удаление тире из ячеек с помощью формулы

С помощью функции SUBSTITUTE числа будут преобразованы в текстовые значения, поэтому при удалении тире ни начальный 0 не будет удален, ни числа не станут экспоненциальной записью. Пожалуйста, действуйте следующим образом:

1. В соседней пустой ячейке, например C1, введите эту формулу: =SUBSTITUTE(A1,"-",""), см. скриншот:

2. Нажмите клавишу Enter, выберите ячейку C1, затем перетащите маркер заполнения до диапазона, который вы хотите охватить этой формулой. Тире между числами будут удалены. См. скриншот:

Удаление тире из ячеек с помощью Kutools для Excel

Если вы новичок в Excel, как формула, так и код могут быть сложными для вас, но не волнуйтесь, функция «Удалить символы» в Kutools для Excel поможет вам быстро удалить тире из ячеек.

1. Выберите диапазон ячеек, из которых нужно удалить тире, а затем нажмите Kutools > Текст > Удалить символы, см. скриншот:

2. В диалоговом окне «Удалить символы» отметьте опцию «Пользовательский», и введите символ «-» в текстовое поле, после чего вы сможете просмотреть результаты в области предварительного просмотра. Затем нажмите кнопку OK, чтобы удалить все тире в выбранных ячейках. См. скриншот:

Примечание. Если выбранные ячейки содержат начальные нули или много цифр, чтобы сохранить начальные нули и избежать превращения чисел в экспоненциальную запись после удаления тире, вам нужно отформатировать ячейки как текст, как показано на скриншоте ниже, перед использованием утилиты «Удалить символы».

Удаление тире из ячеек с помощью кода VBA

С помощью следующего кода VBA вы также можете удалить тире между числами из диапазона ячеек.

1. Выделите диапазон, из которого вы хотите удалить тире.

2. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

3. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуля.

VBA: удалить тире между числами

Sub DeleteDashes()
'Update 20130907
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each rng In WorkRng
    rng.NumberFormat = "@"
    rng.Value = VBA.Replace(rng.Value, "-", "")
Next
Application.ScreenUpdating = True
End Sub

4. Затем нажмите клавишу F5, чтобы запустить этот код, и появится диалоговое окно, которое попросит вас выбрать диапазон, который вы хотите использовать. См. скриншот:

5. После этого нажмите OK, тире между числами будут удалены из ячеек. Формат чисел будет преобразован в текстовый формат. См. скриншоты:

Связанные статьи:

• Удалить буквенные символы из ячеек
• Удалить нечисловые символы из ячеек
• Удалить числовые символы из ячеек
• Удалить непечатаемые символы из ячеек
• Удалить небуквенные символы из ячеек
• Быстро удалить разрывы строк
• Удалить небуквенно-числовые символы