使用.onaction VBA运行带有参数的宏

Question

我以编程方式创建了一个按钮，并为其分配了一个宏。但是，我需要告诉该按钮以打开用户在复选框中选择的特定文件。

我的代码如下：

Dim b As Excel.Shape
Set b =ActiveSheet.Shapes.AddFormControl(xlButtonControl, 10, 10, 100, 100)
b.OnAction = "AMacro"
b.OLEFormat.Object.Text = "Run a macro"