如何在 sheet 上刷新一个对象，而其余对象在 Excel VBA 上冻结

Question

我是 VBA 的新手。我创建了一个资源，它从单个单元格复制并创建一个包含 n 个结果的字符串。同时，它会在结果右侧创建一个图表。当结果低于页面视图时，sheet 来回跳转，图表随之而来。有没有办法使用 VBA 来保持整个 sheet 静止（不明显刷新）同时让每个结果的图形刷新？非常感谢任何人的帮助。

Answer 1

那里不需要select任何东西：

For a = 1 To Range("n").Value
 'Copying Crossed to Results
 Range("D18").Copy
 Cells(a + 16, 2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
    SkipBlanks:=False, Transpose:=False 
' Creates Needle Drop Graph 
'Delete Old Chart 
On Error Resume Next
 ActiveSheet.ChartObjects("PinDrop").Delete
On Error Goto 0
 'Create Chart 
With ActiveSheet.Shapes.AddChart.Chart
   .ChartType = xlXYScatter 
   .Parent.Name = "PinDrop"
end with

如何在 sheet 上刷新一个对象，而其余对象在 Excel VBA 上冻结

How do I refresh one object on a sheet whilst the rest is frozen on Excel VBA

excel

vba

refresh

graph