一个EXCEL文件，有多台电脑同时都需要打开它……现在的问题是当有一台打开这个EXCEL文件，其它电脑用VB代码就没办法打开……请老师们有啥好的办法？

VB用的打开方式：SHELL

Dim ex As New Excel.Application
Dim wb As Workbook
Set wb = ex.Workbooks.Open("*.xls", , True) '只读打开
Dim sh As Worksheet
Set sh = wb.ActiveSheet
ex.Visible = True

这样确实可以打开，但好像好慢的样子.