从文本框中提取的数据与 excel 数据不同 [关闭]答案

【问题标题】：Data extracted from Textbox is not the same as excel data [closed]从文本框中提取的数据与 excel 数据不同 [关闭]
【发布时间】：2018-11-03 10:31:03
【问题描述】：

我有一个文本框multiline=true
我使用公式Split那个文本框，但文本框中的字符串无法查找值，因为这是字符串符号特殊。

【问题讨论】：

您需要分享您的代码并展示宏的 before 和 after 产品的一些示例。然后其他人可以帮助你。截至目前，我们真的不知道问题出在哪里，这可能是没有人提供解决方案的原因。
请帮我写下面的代码。
在您的问题中添加代码。您将代码添加为解决方案 -
我在文本框中有值 MBY001 MBY002 MBY003 MBY004 我使用拆分来获取 Cells(1,"A").value=MBY001 Cells(2,"A").value=MBY002 Cells( 3,"A").value=MBY003 Cells(3,"A").value=MBY004 在我通过使用下面的公式获得值列 A 之后，MBY001->MBY004 中的值无法在 excel 中查找数据，尽管该值存在于电子表格中

标签： vba symbols

【解决方案1】：

这是您的代码，请检查帮助我。

子命令按钮22_Click()

With Sheet2
    If Trim(TextBox21.Text) <> "" Then
        If UBound(Split(TextBox21.Text, Chr(10))) > 0 Then
            For i = 0 To UBound(Split(CStr(TextBox21.Text), Chr(10)))
            Dim a As String
               a = Trim(CStr(Split(TextBox21.Text, Chr(10))(i)))
                If IsEmpty(a) = False Then
                .Cells(1 + i, "A").Value = Trim(CStr(a))
                End If
            Next i
        End If
    End If
End With

结束子

【讨论】：