VB里打开EXCEL

没必要那么复杂
可以直接在EXCEL代开VBA，直接编，跟VB基本上一样的
alt + F11

如果只是读写操作，可以用
open "abc.xls" for input as #1
print #1,…………
close #1

open "abc.xls" for output as #2
print #2,…………
close #2

请参考下面的:
如何操作Excel文件
全面控制 Excel
首先创建 Excel 对象，使用ComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1) 显示当前窗口：
ExcelID.Visible := True;
2) 更改 Excel 标题栏：
ExcelID.Caption := '应用程序调用 Microsoft Excel';
3) 添加新工作簿：
ExcelID.WorkBooks.Add;
4) 打开已存在的工作簿：
ExcelID.WorkBooks.Open( 'C:\Excel\Demo.xls' );
5) 设置第2个工作表为活动工作表：
ExcelID.WorkSheets[2].Activate;
或 ExcelID.WorkSheets[ 'Sheet2' ].Activate;
6) 给单元格赋值：
ExcelID.Cells[1,4].Value := '第一行第