更多待解决问题>>

提问

请问怎么用vb实现对excel文件的读取和写入操作?

举报 回答
请问怎么用vb实现对excel文件的读取和写入操作?
问在线客服
扫码问在线客服

  • 回答数

    4

  • 浏览数

    2,306

举报 回答

4个回答 默认排序
  • 默认排序
  • 按时间排序

没找到满意答案？去问秘塔AI搜索
取消 复制问题

lzlqy1978

已采纳
哎哟，这不就是VBA操作Excel的几行代码嘛～
先整一个Excel对象：`Set excel = CreateObject(excel.application)`（复制粘贴就完事，别问为啥）
然后打开你本地的表格：`excel.workbooks.Open(C:book.xls)`（注意路径自己改！记得提前建好这个文件啊喂）
想让它显示出来就加一句：`excel.Visible = True`（设成False就后台偷偷干活，不露脸）
写数据超简单：`excel.cells(1,2) = 测试` → 第1行第2列（也就是B1）直接塞进测试俩字！
想读回来也方便：`text1 = excel.cells(1,2)` → 这下text1就拿到B1的内容啦～
最后别忘了保存+退出：
`excel.ActiveWorkbook.Save`（Ctrl+S的灵魂版）
`excel.quit`（干完活利索关掉，不占内存！）
小提示：路径里的反斜杠``别手滑打成`/`，不然会翻车；文件得提前放好，不然直接报错闪退！
搞定～速速去试试！（记得先备份原文件，手抖删了别找我哭）
评论
取消 评论
超值推荐

nnvvf

那个文件要放到一台电脑上共享出来。EXCEL中有共享设置的。共享多人编辑。
评论
取消 评论

chongzi_tian

Dim wksObj As Object '
Set ex = CreateObject(Excel.Application）
Set wkbObj = ex.Workbooks.Open(App.Path & \main.xls）' 打开当前文件夹下的main.xls
Set wksObj = ex.Worksheets(1) '打开工作表1
评论
取消 评论

wu274218137

如果你插入的是窗体控件，很简单的。（activex控件比较麻烦，得用vba代码）
右键点车间（1）控件，设置格式，最后一个标签“控制”，单元格链接处点到比如sheet1的g1，确定。
在sheet2的a1输入 =if(sheet1!g1,"车间（1）","车间（2）")
就可以了。
评论
取消 评论

最新回答 更多>

ZOL问答 > 请问怎么用vb实现对excel文件的读取和写入操作?

举报

感谢您为社区的和谐贡献力量请选择举报类型

广告内容 反动言论 色情内容 其他违规违法内容

举报成功

经过核实后将会做出处理
感谢您为社区和谐做出贡献

扫码参与新品0元试用
晒单、顶楼豪礼等你拿

扫一扫，关注我们
提示

确定要取消此次报名，退出该活动？

确定 取消