我已经编写了代码来更改多个受保护工作簿中的单元格内容,查找要从工作表中的表中插入的值。
我遇到的问题是,当我在Files
文件夹中选择一个文件时,它会打开VBA编辑器,显示我正在使用的代码。即使Excel关闭并且重新启动后,该窗口也会打开。
这并不是一个真正的bug。这很烦人,因为我在文件资源管理器中使用预览模式来仔细检查代码是否工作。
文件存储在c:Folder
中。
文件名列表在A列中,从第2行开始,对应的值在B列中更新。
粘贴位置是工作表"参考"的单元格F2
Sub UpdateFiles()
Dim rownum As Long
rownum = 2
Dim last_row As Long
last_row = Cells(Rows.Count, 1).End(xlUp).Row
Dim filename As String
Dim newvalue As Long
For nextRow = 2 To last_row
filename = Range("A" & rownum).Value
newvalue = ActiveWorkbook.Sheets("Sheet1").Range("B" & rownum).Value
Workbooks.Open "C:Folder" & filename
ActiveWorkbook.Unprotect ("password")
ActiveWorkbook.Sheets("References").Range("F2") = newvalue
ActiveWorkbook.Protect ("password")
ActiveWorkbook.Save
ActiveWorkbook.Close
rownum = rownum + 1
Next nextRow
End Sub
我最近也遇到了类似的奇怪事情,结果发现我不小心把一些文件丢到了excel启动文件夹中。我认为值得在那里查看VBA文件:
在此处输入图像描述