首页 > 解决方案 > 从由行分隔的单元格中提取文本

问题描述

我是这类任务的新手,我对如何从 Cell 中提取一些文本感到非常困惑。

这听起来很基本,但让我解释一下。我已经为我的一些员工导出了一些关于某些角色的信息,但它已将所有信息按以下格式放入一个单元格中:

Production Line




Working with Operations Manager




Oversee Production Line

等等。

问题是这一切都由空格和线条分隔。有没有办法将信息分成多少段,每段都分成一个单独的单元格?

再次,让我解释一下。

Cell A1 - Production Line
Cell A2 - working with operations Manager
Cell A3 - Oversee Production Line

另一个问题是特征的数量不确定。

感谢您的所有帮助。

标签: excelvbaexcel-formula

解决方案


假设文本在单元格 B1 中(可以轻松更改),您可以使用 VBA 来执行此操作:

Sub ExtractFromCell()

    Dim lines() As String
    Dim i As Integer, a As Integer

    a = 1
    lines = Split(Range("B1"), Chr(10))

    For i = LBound(lines) To UBound(lines)
        If lines(i) <> "" Then
            Cells(a, 1) = lines(i)
            a = a + 1
        End If
    Next


End Sub

推荐阅读