如何让 Excel 刷新特定单元格

Question

对不起，我是宏的新手。

本质上，我需要做的是，如果单元格值为"ERROR"，则刷新单元格以检查新数据。我在那里有味精盒，以确保我有一切工作。如果有更好的方法，我不依附于此代码。

Sub Cell_Looping1()
'c = cell
For Each c In Selection
'Do this
If c.Value = "ERROR" Then
MsgBox "Cell " & c.Address & " needs to be refreshed"

End If
Next c
End Sub

添加一些上下文。当我从 API 中提取太多数据时，会发生"错误"。我通常通过错误地按 F2 然后按 Enter 选择单元格来解决此问题。这个宏将使生活变得更加轻松。

Answer 1

这将复制按F2编辑/刷新/重新计算单元格而不更改单元格的操作。

Sub YourMacro()
Dim c As Range
For Each c In Selection.Cells
If c.Value = "ERROR" Then c.Formula = c.Formula
Next c
End Sub