首页 > 解决方案 > 从函数添加控件(不是子!)

问题描述

无论如何,我不知道如何通过 UDF添加按钮。
试图通过另一个函数/子调用它,只要初始调用者是一个函数就没有关系。
任何想法如何解决它?任何建议将不胜感激。

Sub AddButtonAt(r As Range)
    With ActiveSheet.Buttons.Add(r.Left, r.Top, r.Width, r.Height)
        .Name = "Btn" & r.Address
        .caption = "B: " & r.Address
    End With
End Sub
Function addB()
    Call AddButtonAt(Selection)
End Function

函数 addB() 只是一个助手。理想情况下,如果可能的话,我会使用 Function AddButtonAt()。

标签: excelbuttoncontrolsuser-defined-functionsadd

解决方案


推荐阅读