excel中使用vba以只读方式打开工作薄的操作方法

发布时间:2017-04-30 14:00

如何excel中使用vba以只读方式打开工作薄的操作?具体怎么设置的呢?今天,小编就教大家在Excel中使用vba以只读方式打开工作薄的操作方法。

###Excel中使用vba以只读方式打开工作薄的操作步骤如下:

首先我们打开一个工作样表作为例子。

excel中使用vba以只读方式打开工作薄的操作方法

我们使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:

Sub openWorkbook2()

Dim fname As String

MsgBox "将c盘中的<新建 Microsoft Excel 工作表.xls>工作簿以只读方式打开"

fname = "C:UsersjohnDesktop新建 Microsoft Excel 工作表.xlsx"

Workbooks.Open Filename:=fname, ReadOnly:=True

End Sub

excel中使用vba以只读方式打开工作薄的操作方法

以只读模式打开的工作表可以编辑,但是不能保存,可以另存为其他的文件,这样的一种操作限制可以很安全的保护原有文档。可以编辑的文档文档标题栏是如图所示的。

excel中使用vba以只读方式打开工作薄的操作方法

而以只读方式打开的excel工作薄却是显示了只读的提示字样。

excel中使用vba以只读方式打开工作薄的操作方法

我们这里对工作薄workbooks对象使用了open方法,来打开一个变量声明将路径文件名赋予的fname变量。并且,设置其为只读方式打开。filename和readonly均是open方法的参数。其中filename参数是必须的。

excel中使用vba以只读方式打开工作薄的操作方法

如果是在excel中操作这一方法,则是选择打开文件命令,选择好需要打开的文件夹后,在选项框中选择以只读方式打开,这样的操作步骤很简单,但是当每次都要运行同一文件时,使用vba明显更高效。

excel中使用vba以只读方式打开工作薄的操作方法

excel中使用vba以只读方式打开工作薄的操作方法的评论条评论