VB怎样判断一个Excel工作簿是否打开，解除一个设为只读属性的工作簿的实现方法100分

Question

如题，用vb 对excel进行操作，如果打开的excel工作簿没有关闭，怎样判断已经打开了它，另外如果一个工作簿的属性为只读，怎样通过代码修改它的属性？

Answer 1

workbook对象有一个ReadOnly属性，这个属性是只读的，你可以通过SaveAs方法将工作簿另存一个可写的副本，或者调用workbook对象的Protect 方法设置工作簿的保护。

Answer 2

workbook是一个集合,该集合会为每个元素分配一些描述性的属性,比如把打开的文件名等,通过遍历集合每个元素并检测它们的相应属性是否有你要找的,如果有就是已经打开,没有就是已经关闭.