我想用vb编程打开excel.急....

Question

dim excelapp as excel.application
set excelapp=new excel.application
excelapp.visible=true
我调用以上程序，但电脑屏幕只是闪几下，并没有打开excel？

Answer 1

Set oleExcel = CreateObject("Excel.Application") 
     Set oleWorkbook = oleExcel.Workbooks.Add 
     Set oleWorkSheet = oleWorkbook.Sheets.Add 
     oleExcel.Visible = True

Answer 2

要设置了workBook对象才能打开,否则没有文档对象生成.dim objApp as new excel.application
dim objWrkBook as excel.workbook
set objWrkBook=objApp.workBooks.add
objapp.visible=true

Answer 3

告诉你一个最好的方法：
1。 进入EXCEL里
2。开始录制宏
3。试着打开一个文件
4。停止录制
5。保存宏
6，打开宏
7。复制到你的VB代码
8。就OK了
9。可以了吗

Answer 4

对了。
你可以声名
dim objWrkBook as excel.workbook
objWrkBook =ACTIVE。WORKBOOK