VB操作EXCEL，在vb界面中对指定的excel文件写入数据
举个简单的例子吧，vb界面中有一个text1,一个command1。
要求1：在text1中写入数据“xx“,然后点击command1，就可以把"xx"显示在excel表格的A1单元格里，比如excel表格的路径在"d:\11.xls"。录入数据后，要自动保存。
要求2：再次打开vb，录入数据，比如在text1中写入"xxx"，点击command1时，因为刚才excel中，A1单元格已经有数据了，所以"xxx"要显示在A2单元格里，依次类推，显示在A3,A4,A5单元格里，也自动保存。
这样可以实现吗？谢谢了，我把分都给你。不过，零头就不给了，呵呵，留着压口袋。
1楼办法还行，不过要是已经有1万行了，那就要先循环1万次在添加数据。
所以，要先获取最后一行的行数，然后加1，这个就是那个空单元格，就在这个单元格里填写数据了。
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Private Sub Command1_Click()
Dim I As Integer
Set xlsApp = Excel.Application
xlsApp.Visible = False
Set xlsBook = xlsApp.Workbooks.Open("D:\11.xls")
I = 1
Do While xlsApp.Sheets(1).cells(I, 1) <> ""
I = I + 1
Loop
xlsApp.Sheets(1).cells(I, 1) = Text1.Text
xlsBook.Close (True)
xlsApp.Quit
Set xlsApp = Nothing
MsgBox "数据写入成功！"
End Sub本回答被提问者采纳
vb怎么打开Excel文件并向特定的单元格填写内容excelvb打开文件
Dim xlBook As Excel.WorkBook Dim xlSheet AsExcel.Worksheet 3、在程序中操作EXCEL表常用命令：Set xlApp = CreateObject(\\"Excel.Application\\")'创建EXCEL对象 Set xlBook =xlApp.Workbooks.Open(\\"文件名\\")'打开已经存在的EXCEL工件簿文件 xlApp.Visible = True '设置EXCEL对象可见(或不可见)...
VB操作excel,给excel录入数据
新建VB的EXE工程，使用如下代码在第一行第一列写入vb操作excel：Option Explicit Dim xlapp As Object Dim xlBook As Object Dim xlSheet As Object Dim A As String Private Sub Command1_Click()Set xlapp = CreateObject("excel.application")xlapp.Visible = True Set xlBook = xlapp.Workbook...
vb如何读取excel数据并存入数组?
读写EXCEL表： \\x0d\\x0a1、在工程中引用Microsoft Excel类型库： \\x0d\\x0a\\x0d\\x0a从"工程"菜单中选择"引用"栏；选择Microsoft Excel 12.0 Object Library（EXCEL2007），然后选择"确定"。表示在工程中要引用EXCEL类型库。 \\x0d\\x0a\\x0d\\x0a2、在通用对象的声明过程中定义EXCEL对象： ...
怎么利用VB向指定的EXCEL插入数据;
Rcount) = Ds(1, Rcount) '把数组ds(1,rcount)这个数据写入Excel中，写入的内容其实就是标题“计算结果” For i = 2 To Hcount - 1 '再把数组ds(i,
vb输入输出excel数据
在VB中实现Excel数据读写的方法如下：1. 引入Excel类型库：在"工程"菜单中选择"引用"，添加"Microsoft Excel 9.0 Object Library"，点击"确定"。2. 定义Excel对象：在通用对象的声明过程中定义三个Excel对象：xlApp（应用）、xlBook（工作簿）、xlSheet（工作表）。3. 操作Excel表常用命令：创建Excel...
利用VBA在EXCEL中对选定区域进行编辑并写入结果
你这样操作.在菜单栏上右击,在弹出的菜单上选择控件工具箱.在出来的控件工具当中找到命令按钮,左击一下,在表的某个位置画出一个按钮来,双击这个按钮,把这些代码放进去.保存并关闭这个表.再打开就能用了.
请问如何用vb实现对excel文件的读取和写入操作请问如何用vb实现对exce...
首先我们观察这个XML文件的结构，看到这个节点在整个XML中的关系去掉其他你不需要读取的节点比较容易看清楚，像这样子首先，你得 创建一个XMLDocument对象，并使用Load方法加载 然后使用SelectSingleNode方法不断的从外到里选中节点，直到选中weather节点为止 再使用InnerText方法获得该节点的内容 Okay，然后就有啦...
如何用vb提取excel表格中的数据如何用vb提取excel表格中的数据和...
首先需要知道你要引用的数据在Excel中的位置，然后在VB里面引用Excel，然后打开Excel文件读数据 Dim scxls As Excel.Application Dim scbook As Excel.Workbook Dim scsheet As Excel.Worksheet ‘Set scxls = CreateObject(\\"excel.application\\")‘Set scbook = scxls.Workbooks.Add Set scbook = ...
vb 操作excel, 如何在excel文件中写入值
Private Sub Command1_Click()Dim xlExcel As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Dim AppExcel As Object Dim str As String str = App.Path & "\\11.xls"Set objExcel = CreateObject("Excel.Application")objExcel.Visible = False '设置excel对象...
vb怎样读取excel中指定单元格内容并显示vb怎样读取excel中指定单元格...
1.打开一个Excel的文件,在表格中输入简单的表格,比如学生成绩表格。2.接着,鼠标左键单击【开发工具】菜单标签,在VBA控件下拉菜单中,并选择按钮控件,...3.然后,在表格中绘制出按钮控件,并修改控件名称。4.接着,鼠标左键单击【查看代码】按钮 5然后，在代码窗口中输入VBA语句，比如输入定义变量语句，...
