excel - 重新安装 Windows 后运行宏
问题描述
一周前,我删除了我的 windows 10 pro 并再次将其安装到我的电脑上。然后我又安装了 MS Office 2013(64 位)。不幸的是,我无法在我的电脑上使用我的宏。它给出了运行时错误 9。
Private Sub CommandButton2_Click()
For i = 17 To 512
For j = 1 To 9
Worksheets("İstekFişi").Cells(i, j).Value = ""
Next j
Next i
Sheets("İstekFişi").Range("P14").Value = Sheets("İstekFişi").Range("P14").Value + 1
MsgBox "The SpreadSheet is clean now!"
Unload Me
End Sub
顺便说一下,这个宏在另一台电脑上运行良好。PS 在我重新安装 Windows 之前,我的宏在我的电脑上运行良好。
有人和我有同样的问题吗?有没有办法解决这个问题?
祝你今天过得愉快。
解决方案
代替
For i = 17 To 512
For j = 1 To 9
Worksheets("İstekFişi").Cells(i, j).Value = ""
Next j
Next i
利用
Worksheets("İstekFişi").Range("A17:I512").Value = vbNullString
Run-time error 9
如果您引用的工作表名称不存在,也会发生这种情况,即确保您没有在 Windows 10 计算机上重命名工作表或意外删除它。(当然,如果您可以将文件保存并复制回旧计算机并且它可以在那里工作但不能在新计算机上工作,那么这不适用)。
推荐阅读
- javascript - 反应 | 如何将输入中的值插入 API 调用
- python - 数据帧分组操作
- php - 设置最大文件大小 PHP
- security - 破碎的分块编码
- swiftui - SwiftUI: How to center NavigationLink inside of a Form
- adonis.js - Adonisjs 恢复令牌模型迁移
- angular - 如何配置 Angular 以呈现 HTML 注释?
- c - 在 linux 手册页中,为什么在第 2 节(系统调用)和第 3 节(libc)中都列出了一些函数
- python - 更改使用文件中的数据创建的箱线图的大小
- python - 构建正则表达式以仅提取域