vb给excel添加工作表

Excel中的VB语言叫做VBA，在VBE中使用代码新建即可。

Excel版本参考：2010

演示：新建一个表名为test的工作表。

1、ALT+F11，进入VBE窗口。

2、右击工作表标签-插入-模块。

3、输入代码：

Sub test()

Worksheets.Add(after:=Sheets(Sheets.Count)).Name = "test"

End Sub

4、按下F5执行，查看工作表，新建的test表 已新建好。

ACCESS 数据库ole对象数据类型字段是无法直接用SQL语句进行添加和修改文件的。但是这种数据类型字段里存储的ole对象可以直接用SQL语句删除掉，例如：

删除OLE对象字段不为为空的那些记录

delete from table1 where col_ole is not null

清空OLE对象字段里存储的文件

update table1 set col_ole=null

至于添加和修改ole对象SQL语句则是无能为力。ACCESS数据表添加、修改、删除ole对象可以采用手动的方式进行 *** 作很方便，也可以用代码来实现。

下面是利用ADO数据访问对象的Stream流对象的代码解决示例。注意代码需要应用ADO2.5以上版本（于VBE编辑器 菜单——工具——引用 勾选Microsoft ActiveX Data Objects 2.5 Library) 假设

---