获取当前的填充颜色

Question

如何使用VBA获取功能区中的当前填充颜色？我想手动选择“填充颜色”以突出显示整个行。我知道我可以用foo.EntireRow.Interior.ColorIndex = 3这样的代码突出显示整个行。但是，我不想将其设置为3，而是将其设置为功能区中用户当前选择的填充颜色。

我为使用Options.DefaultHighlightColorIndex的Microsoft Word找到了一个类似的线程，但是我没有为Microsoft Excel找到一个线程。

编辑：对不起，重复的问题。我希望有一个更好的答案，不需要先进行主动选择。如果没有，我会接受乔纳森的回答。目前，我只是用CellFillColorPicker突出显示当前单元格，获取该单元格的颜色，然后突出显示该颜色的行。

Answer 1

这个问题似乎与此相似：VBA - use color already select in Excel to fill cell interior

看起来这是您想要的代码：

Application.CommandBars.ExecuteMso“ CellFillColorPicker”