Visual Basic如何动态调用EXCEL表格

[dragonyan]

小弟初次尝试Visual Basic ,最近在用此调用EXCEL表格时陷入困境,望各位大哥赐教!!!!

[Un1]

陷入了什么困境？

[littletao]

拉一个ole控件，把class设置为excel，应该没问题的。

[grievefish]

说具体点！！

[zhengsky]

可以使用DDE，与EXCEL建立自动式连接，
example:
Private Sub Form_Load()
text1.LinkMode=vbLinkNone
text1.LinkTopic="Execl and Money.xls"
text1.LinkItem="R1C1"
text1.LinkMode=vbLinkAutomatic
End Sub

[RuFeng]

你是想控件EXCEL，还是想读取EXCEL的数据文件啊？说清楚大家才可以帮你啊！

[Bird]

Set db = OpenDatabase(“filename”, False, False, "Excel 8.0;HDR=YES;")
Set rs = db.OpenRecordset(“sheet1”&”$”,dbopentable)

'rs是记录集变量
'JET引擎访问EXCEL有一些限制
'1.不能删除行
'2.不能创建索引
‘3.不能删除或修改包含公式的单元
‘4.不能读取加密的文件，即使有正确的passwd

[ninesun]

1.首先在工程中引用Microsoft Excel8.0 Object
2.如果是调用运行中的Excel则使用GetObject,否则使用CreateObject,可以参照下面的例程:
Global MyExcel As Excel.Application
Global Book As Excel.Workbook
Global MySheet As Excel.Worksheet

On Error Resume Next
Set MyExcel = GetObject(, "Excel.Application.8")
If Err Then
On Error GoTo 2
Set MyExcel = CreateObject("Excel.Application.8")
NewXls = True
End If
Set Book = MyExcel.Workbooks.Open(App.Path + "\report\test.xls")
Set MySheet=book.sheets(0)

[huan_z]

以上的DDE和VBA的方法都很好。
但是我这有一个控件“Formula One 6”是Z版，有序列号.
支持Excel5、Excel7、8、Text...
可以单独开发...
3月8日发布