我有一个包含两列的图表,这些列在网格单元格中水平计数并具有特定的颜色填充。 (= CountCellsByColor(##:##,#)每列有24行。
我现在想在特定单元格中创建一个宏按钮,以便用户可以单击该按钮,列将自动更新。目前这是通过点击一个单元格,按F2然后按Enter完成的,这很好但是如果我可以让它变得更简单。
这就是我所拥有的,我从Developer选项卡(Insert,Button)创建了一个commandButton;然后在VBA屏幕中显示以下代码;
Sub RefreshCells()
Dim r As Range, rr As Range
Set rr = Selection
For Each r In rr
r.Select
Application.SendKeys "{F2}"
Application.SendKeys "{ENTER}"
DoEvents
Next
End Sub
我点击按钮后会弹出一个限制使用错误,它会运行一次,但是它会锁定剩下的单元格进行编辑。我在工作表上运行了许多VBA代码,允许工作表的用户只需单击某些单元格即可将其变为不同的颜色。
答案 0 :(得分:0)
我让这太复杂了!如果我可以尝试回答我自己的问题,我就是这样做的,
在Developer选项卡下,我点击Record Macro然后点击F2 Enter,然后点击Stop Record并保存该功能。然后我在开发人员选项卡下创建了一个Button,并为其分配了该宏。
Sub Macro5()
'
' Macro5 Macro
'
'
Range("D33:D34").Select
ActiveCell.FormulaR1C1 = ""
Range("D35").Select
End Sub
它可能不对,但它似乎具有相同的效果,点击进入一个单元格,点击F2 + Enter。没有完全自动计数更新的列,没有错误,没有错误!