用于从命名范围中选择命名引用的按钮的 VBA excel 宏

【问题标题】：VBA excel macro for a button that selects named reference from a named range用于从命名范围中选择命名引用的按钮的 VBA excel 宏
【发布时间】：2018-01-14 11:19:20
【问题描述】：

我有一个命名范围“last_monday”，它动态计算一个变量，即上周一的日期（“d-mmm-yy”）。我想要一个可以分配给按钮的宏，该按钮将选择上周一日期所在的列，该列位于更广泛的按列日期范围内，称为“date_range”。

例如假设今天的日期是 2018 年 1 月 15 日星期一，按钮将选择下面示例中位置 BQ5 的单元格。

【问题讨论】：

标签： vba excel date

【解决方案1】：

下面的函数选择Date_Range 中由Last_Monday 的值指示的单元格。如果没有匹配，它什么也不做。

Sub SelectMonday()

    Dim C As Long

    On Error Resume Next
    C = Application.Match(Range("Last_Monday").Value2, Range("Date_Range"), 0)
    If C Then Range("Date_Range").Cells(C).Select
End Sub

【讨论】：

效果很好。我想知道，如何将其分配给按钮对象？当我右键单击按钮并选择分配宏时，我没有在可用宏列表中看到 SelectMonday。
抱歉！您确实说过要将宏分配给按钮。为此，它不应该是一个函数。我已经修改了我的原始答案，将过程更改为一个子程序，只要它存储在标准代码模块中，您就会看到它列出来。