当前位置:系统粉 > 电脑问答 > 其他问答 > 如何用VBA读取EXCEL文本框控件数据?

如何用VBA读取EXCEL文本框控件数据?

提问者:丿氓  |  浏览 次  |  提问时间:2017-04-13  |  回答数量:1

如何用VBA读取EXCEL文本框控件数据?(图1)我的EXCEL电子表格里有很多文本框控件,如何用VBA读取”文本框控件”中的数据且自动复制粘贴到单元格中?

已有1条答案
king丶nanxi

king丶nanxi

回答数:33  |  被采纳数:40

2017-04-13 08:50:03
在Excel表格中输入内容,以方便在VBA中进行读取和处理操作。进入VBA环境,可以按键盘上的“Alt+F11”进入。右击“Microsoft Excel对象”,从其右键菜单中选择“插入”-“用户窗体”项。接着向窗体中拖动一个“标签”和一个“按钮”,右击“按钮”,从其扩展菜单中选择“属性”项。在打开的“属性”面板中对“按钮”和“标签”进行相关设置,其中包括“名称”和“标题”。双击“获取Excel数据”按钮,在打开的代码编辑窗口中,输入以下代码:Private Sub GetDate_Click() Dim i As Integer Dim j As String For i = 2 To 8 '数据位于2至8行 j = j & Chr(10) & Chr(13) & Sheets(1).Cells(i, 1) & " " & Sheets(1).Cells(i, 2) '读取每行数据 '格式化输出 Next i Label1.Caption = Label1.Caption & jEnd Sub双击“Sheet1”工作表,在弹出的代码编辑窗口中输入如下代码:Private Sub Worksheet_Activate()UserForm1.ShowEnd Sub返回Excel表格,激活工作表,就可以看到窗口弹出,同时点击“获取Excel数据”按钮,就可以读取Excel中的数据啦。
赞 3
解决方法
版权信息

Copyright @ 2011 系统粉 版权声明 最新发布内容 网站导航