怎么用vb创建excel文件(vb创建一个excel文件)

1. vb创建一个excel文件

、在工程中引用Microsoft Excel类型库：从"工程"菜单中选择"引用"栏；选择Microsoft Excel 9.0 Object Library（EXCEL2000），然后选择"确定"。表示在工程中要引用EXCEL类型库。

2、在通用对象的声明过程中定义EXCEL对象：Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkBookDim xlSheet As Excel.Worksheet3、在程序中操作EXCEL表常用命令：

Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件xlApp.Visible = True '设置EXCEL对象可见（或不可见）

Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表xlSheet.Cells(row, col) =值 '给单元格（row,col）赋值xlSheet.PrintOut '打印工作表xlBook.Close (True) '关闭工作簿xlApp.Quit '结束EXCEL对象Set xlApp = Nothing '释放xlApp对象这是我收藏的，你试一下

2. 如何用vb建立Excel数据库

Dim excel As ObjectSet excel = CreateObject("excel.application") '设定 excel API'--------------这上面可不看 照抄excel.workbooks.Open ("C:\book.xls") 'P.s请先自己创立 'excel 开启excel.Visible = True 'excel 显示 or 隐藏 (True of Falseexcel.cells(1,2)="测试"text1 = excel.cells(1,2) 'text1 读取excel.ActiveWorkbook.Save 'excel 存档excel.quit 'excel 关闭

3. vb如何创建函数

vb出现子程序或函数未定义可能是少打或者多打几个字母或者单词所导致无法运行。

Visual Basic（VB)是一种由 Microsoft 公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。从任何标准来说，VB都是世界上使用人数最多的语言——不管是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

4. vb 创建文件

测试成功，原码：Dim xlapp As Excel.Application 'Excel对象Dim xlbook As Excel.Workbook '工作簿Dim xlsheet As Excel.Worksheet '工作表Dim xlrange As Excel.rangePrivate Sub Command1_Click()Set xlapp = CreateObject("excel.application") '第一层Set xlbook = xlapp.Workbooks.Addxlapp.Visible = Truexlbook.sheets(1).range("a1") = "新建成功"xlbook.SaveAs App.Path & "/测试.xls"xlbook.CloseEnd Sub

5. 如何在excel中使用VB

可以调用工作表函数vlookup、hlookup、lookup、match、find等函数进行查询。也可以使用for each或者for、do loop等循环语句进行查询。具体如何使用，要结合你的实际需要来看

6. vb编写excel

dim ii as string '定义一个变量为ii ii=1'设定ii的值为1 Dim ex1 As Object Dim exwbook As Object Dim exsheet As Object Set ex1 = CreateObject("excel.application"

) Set exwbook = Nothing Set exsheet = Nothing Set exwbook = ex1.Workbooks().Add Set exsheet = exwbook.Worksheets("sheet1") ex1.Visible = True '以上代码是运行excel并新建一个文档 ex1.Range("a" & ii).Value=textbox.text '把textbox中的数据逐条记录到EXCEL中的A列,一条记录一行 ii=val(ii)+1'每记录一条记录,excel行数+1当然你直接把上面的代码放到timer控件里是不行的,要灵活运用啊