在outlook中如何对Excel数据进行操作_VBA

在outlook中怎么对Excel数据进行操作?
如题,我想对Excel进行操作.

VB code

    Dim dataTmp As String    Dim dataXls As Object    Dim Ro As Long        Dim Subj As String    Dim endDate As String    Dim Comm As String    Dim SaveIn As String        dataTmp = "C:\temp\database.xls"    Set dataXls = GetObject(dataTmp)    With dataXls.sheets(1)        Ro = .[A65536].End(xlup).row + 1    End With        Set dataXls = Nothing

这样运行不成功,应该如何修改?

------解决方案--------------------------------------------------------
“提示我的Ro = .[A65536].End(xlup).row + 1中xlup未定义..”这句没错呀

把你的代码完整复制上来看看
------解决方案--------------------------------------------------------
xlUp应该是Excel的一个常量。如果说这个没定义，建议找出它的常量，把值直接替换上去。