[求助]请问在VBA中如何以只读方式打开EXCEL？

chpizbh

高手帮帮忙吧！

我要以只读的方式打开D:盘的1.XLS，我该怎么编写程序？

把代码写下来吧，谢谢各位高手了！

chpizbh

很感谢MM！

怎么把这段代码放在1.XLS的模块里呀！

还有，我还要打开一些文件名不固定的EXCEL文件，也是以只读的方式打开，如何打开呀？

chpizbh

还是不行呀！提示不能给只读属性赋值呀！你试试！

chpizbh

MM救我！

现在太晚了，下午在说吧！

再次感谢你！

两袖清风

cooloaky的方法正解

sub openfile()

workbooks.open "d:\1.xls",,true

end sub

两袖清风

To plxmm

ActiveWorkbook.ReadOnlyRecommended 不是设置只读属性的，请参考帮助

FENGJUN

应用于 Workbooks 对象的 Open 方法。

打开一个工作簿。

expression.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad, OpenConflictDocument)

ReadOnly Variant 类型，可选。如果该值为 True，则以只读模式打开工作簿。

sfly

这个问题我也想知道

[em02][em02]

chpizbh

以下是引用FENGJUN在2005-6-3 12:42:00的发言：

应用于 Workbooks 对象的 Open 方法。

打开一个工作簿。

expression.Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMru, Local, CorruptLoad, OpenConflictDocument)

ReadOnly Variant 类型，可选。如果该值为 True，则以只读模式打开工作簿。

chpizbh

to FENGJUN

能给个例子吗？谢谢！