excel - 使用 Excel VBA 更改 View

标签 excel vba

我尝试运行一个简单的 For Each 循环来更改 Excel 中的 View ,但不断收到:

438 Run-time Error

Sub ChangeView()

Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets
    ws.Select
    ActiveWindow = xlNormalView
    Range("A1").Select
Next

该错误突出显示 ActiveWindow 行。为什么?

最佳答案

ActiveWindow 是一个对象xlNormalView 是与该对象的属性关联的长/枚举常量。您不能将属性值分配给对象本身,而是将其分配给适当的属性。我相信正确的应该是:

ActiveWindow.View = xlNormalView 

关于excel - 使用 Excel VBA 更改 View ,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/29245499/

相关文章:

excel - 如何根据条件附加到文本

excel - 如何在大型项目中找到结束语句

excel - 计算日期列表中事件的天数和持续时间

vba - 删除单元格中特定字符后的数据

Excel - 如何根据唯一的列标题名称从另一个工作表填充列

c++ - 导入 CSV 文件,对其进行编辑,并以修改后的值输出

excel - 快速删除空行遍历文件夹中的所有工作簿

vba - 环境 ("username")/Windows 7 64 位计算机上出现错误

自动填充单元格的 VBA 宏

excel - 如何包装 IF(ISBLANK( 围绕所有公式