社区
Office开发/ VBA
帖子详情
在VB中掉用EXCEL的COM对象,如何将EXCEL的SHEET1删除掉
aqinag
2003-08-22 03:59:31
在VB中掉用EXCEL的COM对象,如何将EXCEL的Sheet1删除掉
Dim fso1 As New Excel.Application
fso1.Worksheets("Sheet1").Delete
这样删不掉,不知为何,如何删掉
...全文
138
6
打赏
收藏
在VB中掉用EXCEL的COM对象,如何将EXCEL的SHEET1删除掉
在VB中掉用EXCEL的COM对象,如何将EXCEL的Sheet1删除掉 Dim fso1 As New Excel.Application fso1.Worksheets("Sheet1").Delete 这样删不掉,不知为何,如何删掉
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
aqinag
2003-09-08
打赏
举报
回复
ok
blackhawk_yps
2003-08-29
打赏
举报
回复
可以用Application.DisplayAlerts = False 避掉对话框
完成后最好再恢复
Application.DisplayAlerts = True
blackhawk_yps
2003-08-29
打赏
举报
回复
Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Delete
这样的删除excel会弹出确认对话框的,如何直接删除呢?
HawaiiLeo
2003-08-23
打赏
举报
回复
Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Delete
dary_zhou
2003-08-23
打赏
举报
回复
这个可以这么说,你先建一个NEW EXCEL.APPLICATION,
然后打开一个文件,或者新建一个文件, 这时就可以用
fso1.Worksheets("Sheet1").Delete
LeeZi
2003-08-22
打赏
举报
回复
Dim ExcelApp As New Excel.Application
ExcelApp.Visible = True
Dim wk As Workbook
Set wk = ExcelApp.Workbooks.Add
Dim ws As Worksheet
' Set ws = wk.Worksheets(1)
Set ws = wk.Worksheets("Sheet1")
Stop
ws.Delete
Stop
wk.Close False
ExcelApp.Quit
VB
中读取
EXCEL
源码
VB
读取
EXCEL
源码Private Sub
Com
mand1_Click() Dim i As Integer, j As Integer Set xlApp = CreateObject("
Excel
.Application") '创建
EXCEL
应用类 xlApp.Visible = False '设置
EXCEL
不可见 Set xlBook = xlApp.Workbooks.Open(App.Path & "\data.xls") '打开
EXCEL
工作簿 Set xlsheet = xlBook.Worksheets(1) '打开
EXCEL
工作表 'xlsheet.Activate '激活工作表 Dim litem For i = 2 To 7 '行/记录条数 Set litem = ListView1.ListItems.Add() litem.Text = xlsheet.Cells(i, 1) litem.SubItems(1) = xlsheet.Cells(i, 2) litem.SubItems(2) = xlsheet.Cells(i, 3) litem.SubItems(3) = xlsheet.Cells(i, 4) 'MsgBox xlsheet.Cells(i, j) Next xlBook.Close (True) '关闭
EXCEL
工作簿 xlApp.Quit '关闭
EXCEL
Set xlApp = Nothing '释放
EXCEL
对象
End Sub
Excel
多个sheet页汇总
vb
程序.txt
Excel
多个sheet页汇总到一个sheet页中,该方法可以忽略sheet页中的有格式但没有数据的多余项。
VB
.NET开发
Excel
插件实例课程
手把手教您如何快速开发一个属于自己的
Excel
插件,制作
Excel
众多功能,办公自动化,高效率办公,开发一个个性化的
excel
插件。我会从头到尾开始教学,开发过程常遇到什么问题,该如何解决。记录我开发
excel
插件的案例和问题,将开发经验分享给大家
使用
VB
A将
excel
的数据存放到mysql数据库里面,并将内容显示到sheet数据表
使用
VB
A将
excel
的数据存放到mysql数据库里面,并将内容显示到sheet数据表
用
VB
script指定打开
Excel
的第三个sheet
NULL 博文链接:https://cgd123.iteye.
com
/blog/380228
Office开发/ VBA
5,138
社区成员
17,885
社区内容
发帖
与我相关
我的任务
Office开发/ VBA
其他开发语言 Office开发/ VBA
复制链接
扫一扫
分享
社区描述
其他开发语言 Office开发/ VBA
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章