如何使用宏创建下拉菜单

时间:2019-07-18 17:48:31

标签: excel vba drop-down-menu dropdown excel-vba-mac

我正在尝试创建一个下拉列表,该列表将为每个选项选择运行一个宏。下拉列表将包含“ Google”和“ New Businesses”。选择Google后,我需要运行某个宏。我准备好了宏代码,只是想知道自从我使用Macbook以来是否有可能

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("F4")) Is Nothing Then
Select Case Range("F4")
    Case "Google": Google
    Case "New Businesses": New_Businesses
End Select
End If
End Sub

上面的代码位于第一张工作表中,其中“工作表”和“更改”为下拉选项。以下代码位于Module1中:

Sub Google()
'First Macro
Call GoogleManagementFee
'Second Macro
Call HideTermsAndConditions
End Sub

Sub GoogleManagementFee()
Sheets("THIRD-PARTY").Range("C26").Value = 0
End Sub

Sub HideTermsAndConditions()
Worksheet("SOW").Range("54:110").Rows.Hidden = True
End Sub

Sub New_Businesses()
Call UnhideTermsAndConditions
Call ManagementFee10
End Sub

Sub UnhideTermsAndConditions()
Range("54:110").Rows.Hidden = False
End Sub

Sub ManagementFee10()
Sheets("THIRD-PARTY").Range("C26").Value = 0.10
End Sub

我相信,当我从创建的下拉菜单中选择Google或“新业务”时,这些代码应能使宏运行。我想知道是否需要下载ActiveX,或者我只是在代码方面做错了什么。

0 个答案:

没有答案