如何读取行 VBA Excel 并在文本框中显示

在 VBA Excel 中，读取行通常用于从 Excel 中获取数据并将其显示在用户界面中的文本框中。这可以通过以下步骤实现：

步骤1：创建文本框

首先，需要在用户界面中创建一个文本框。可以通过在“开发人员”选项卡中选择“插入”->“文本框”来创建。在文本框的“属性”选项卡中，将其名称设置为“TextBox1”。

步骤2：读取行数据并将其显示在文本框中

接下来，需要编写 VBA 代码来读取行数据并将其显示在文本框中。以下是 VBA 代码的片段：

Dim myRow As Integer
myRow = 1 ' 读取第1行数据

With Sheet1 ' 要读取的工作表
    ' 将行数据读入数组中
    Dim myData() As String
    myData = Split(.Rows(myRow).Value, ",") ' 假设数据用逗号分隔

    ' 将数组中的数据拼接成字符串并显示在文本框中
    TextBox1.Text = Join(myData, vbCrLf) ' 用换行符分隔数据
End With

以上代码片段首先将要读取的行数据读入一个数组中，然后使用“Join”函数将数组中的数据拼接为一个字符串，并使用换行符分隔数据。最后将这个字符串显示在名为“TextBox1”的文本框中。

步骤3：调用代码

最后，需要将代码与用户界面中的按钮或其他控件相关联，以便用户可以触发代码并读取行数据。可以通过在 VBA 中创建一个命名为“CommandButton1”的按钮来实现。在按钮“单击”事件的 VBA 代码中加入上述片段即可。

Private Sub CommandButton1_Click()
    ' 插入上述代码片段
End Sub

这是一个简单的示例，了解如何读取行 VBA Excel 并在文本框中显示。可以根据需要进行调整和调整。