关于VBA在Access和Excel中

conddoo

请问大侠：
将excel中的vba代码为什么不能在access的vba中运行呢？
我就试了个很简单的代码行：workbooks("New").worksheets("Sheet1").range("A9") = "hello"

conddoo

更正标题：关于VBA在Access和Excel中 的区别

shepdog

吐血，ACCESS就没有楼主写的对象。

hustnzj

conddoo 发表于 2012-12-5 15:35
呵呵，3楼的意见很中肯啊！
之后我了解到的，excel VBA, access VBA, work VBA, outlook VBA, PPT VBA中的 ...

1. Sub ts()
   
2.     Dim app As Object
   
3.     Dim xlbook As Object
   
4.     Dim myName$
   
5.     myName = "D:\123"
   
6.     Set app = CreateObject("Excel.application")
   
7.     Set xlbook = app.Workbooks.Open(myName)
   
8.     xlbook.worksheets("Sheet1").Range("E1") = "我来自AccessVBA"
   
9.     app.Visible = True
   
10.     Set app = Nothing
    
11. End Sub

复制代码

conddoo

呵呵，3楼的意见很中肯啊！
之后我了解到的，excel VBA, access VBA, work VBA, outlook VBA, PPT VBA中的对象都是不同的，在其中之一编写VB代码时，只能操作相应的对象。

402854992

这都被你发现了..........

panan12301

风马牛不相及。无言以对。

conddoo

hustnzj 发表于 2012-12-7 22:13

先创建对象，再操作excel, 学到了，谢谢！