社区
VB
帖子详情
江湖救急!关于Excel导入的问题
sj1983
2007-03-08 05:49:17
我装的是office2003,但我想导入excel object library9.0 (我有excel9.olb)
请问有什么好方法
...全文
248
6
打赏
收藏
江湖救急!关于Excel导入的问题
我装的是office2003,但我想导入excel object library9.0 (我有excel9.olb) 请问有什么好方法
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
北京的雾霾天
2007-03-22
打赏
举报
回复
给你个后期对Office绑定的例子参考下吧:
private void btnLater_Click(object sender, EventArgs e)
{
object objApp;
object objBook;
object objBooks;
object objSheets;
object objSheet;
object objRange;
object[] Parameters;
try
{
// Get the class type and instantiate Excel.
Type objClassType;
objClassType = Type.GetTypeFromProgID("Excel.Application");
objApp = Activator.CreateInstance(objClassType);
//Get the workbooks collection.
objBooks = objApp.GetType().InvokeMember("Workbooks",
BindingFlags.GetProperty, null, objApp, null);
//Add a new workbook.
objBook = objBooks.GetType().InvokeMember("Add",
BindingFlags.InvokeMethod, null, objBooks, null);
//Get the worksheets collection.
objSheets = objBook.GetType().InvokeMember("Worksheets",
BindingFlags.GetProperty, null, objBook, null);
//Get the first worksheet.
Parameters = new Object[1];
Parameters[0] = 1;
objSheet = objSheets.GetType().InvokeMember("Item",
BindingFlags.GetProperty, null, objSheets, Parameters);
//Get a range object that contains cell A1.
Parameters = new Object[2];
Parameters[0] = "A1";
Parameters[1] = Missing.Value;
objRange = objSheet.GetType().InvokeMember("Range",
BindingFlags.GetProperty, null, objSheet, Parameters);
//Write "Hello, World!" in cell A1.
Parameters = new Object[1];
Parameters[0] = "Hello, World!";
objRange.GetType().InvokeMember("Value", BindingFlags.SetProperty,
null, objRange, Parameters);
//Return control of Excel to the user.
Parameters = new Object[1];
Parameters[0] = true;
objApp.GetType().InvokeMember("Visible", BindingFlags.SetProperty,
null, objApp, Parameters);
objApp.GetType().InvokeMember("UserControl", BindingFlags.SetProperty,
null, objApp, Parameters);
}
catch (Exception theException)
{
String errorMessage;
errorMessage = "Error: ";
errorMessage = String.Concat(errorMessage, theException.Message);
errorMessage = String.Concat(errorMessage, " Line: ");
errorMessage = String.Concat(errorMessage, theException.Source);
MessageBox.Show(errorMessage, "Error");
}
}
北京的雾霾天
2007-03-22
打赏
举报
回复
你要用后期绑定来调用Office,不要在项目中引用组件.
sj1983
2007-03-12
打赏
举报
回复
阿。。。。。。。。。
难道没人知道吗
sj1983
2007-03-09
打赏
举报
回复
客户机上装的是office2000
sj1983
2007-03-09
打赏
举报
回复
那里面找到的是11
cangwu_lee
2007-03-08
打赏
举报
回复
引用 COM 里面找
单片机救急 期末版!!!!!
单片机救急 期末版!!!!!
Xtrabackup全备+binlog增备恢复整个数据库
江湖救急
Xtrabackup全备+binlog增备恢复整个数据库
江湖救急
山东大学2021~2022
江湖救急
笔记——计算机系统原理
计算机系统原理课救急笔记(基于期末划重点)
江湖救急
笔记——计算机网络.docx
山东大学2021~2022计网个人复习笔记
修复被损坏的Word文档
用来修复被损坏了的word文档!临时用下,或许能救救急!
VB
16,555
社区成员
110,528
社区内容
发帖
与我相关
我的任务
VB
VB技术相关讨论,主要为经典vb,即VB6.0
复制链接
扫一扫
分享
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章