Разделите данные, отделенные от «-» в одном столбце, на несколько в Excel

Question

Я использую Microsoft Excel, и мне дали файл, в котором в одном столбце есть два слова, отделенных от - (пробел, да sh, пробел), то есть что-то вроде этого:

XXXXXX - XXXXXXXXXXXX
XXX - XXXXXXXX
XXXX - XXX

Я хотел бы разделить эти слова и поместить их в два разных столбца. Как я могу это сделать? Заранее спасибо.

Answer 1

Вы пометили вопрос с помощью VBA, но не добавили ни одного кода.

Решение, отличное от VBA, будет использовать TEXT TO COLUMNS. Просто отметьте в качестве разделителей пробел и параметр other (установите его на -), и он будет работать правильно:

При использовании ТЕКСТА К КОЛОННАМ на шаге 1 выберите Delimited. На шаге 2 выполните следующие действия:

На третьем шаге выберите Fini sh

И Вы получите это:

Answer 2

Вам потребуется l oop ячеек, используя Split для разделения данных, используя "-" в качестве разделителя, а затем записать их в соответствующую ячейку.

Sub sSplitHyphen()
    Dim lngRow As Long
    Dim lngLast As Long
    Dim aData() As String
    lngLast = ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row
    For lngRow = 1 To lngLast
        If InStr(ActiveSheet.Cells(lngRow, 1), "-") > 0 Then
            aData = Split(ActiveSheet.Cells(lngRow, 1), "-")
            ActiveSheet.Cells(lngRow, 2) = Trim(aData(0))
            ActiveSheet.Cells(lngRow, 3) = Trim(aData(1))
        End If
    Next lngRow
End Sub

I ' мы использовали Trim() для удаления начальных / конечных пробелов. Если все ваши данные разделены знаком «-», вы можете использовать это для разделения данных.

С уважением,