首页 > 解决方案 > 函数内部的相关下拉框 VBA

问题描述

我需要您的帮助,以使我的 3 个组合框相互依赖。目前我有以下代码,如下所示。

我想要的是当我选择客户“Google”时,它会为我提供我在表格“Support_Data”中的所有 Google 位置。我已经尝试过 Select case 功能,也可以结束 if 但它对我根本不起作用。

With frmClaim
 
        
        Sheets("Support_Data").Range("A2", Sheets("Support_Data").Range("A" & Application.Rows.Count).End(xlUp)).Name = "Customer"
        
        .cmbCustomer.RowSource = "Customer"
        .cmbCustomer.Value = ""
   
          
        Sheets("Support_Data").Range("B2", Sheets("Support_Data").Range("B" & Application.Rows.Count).End(xlUp)).Name = "city"
        
        .cmbcity.RowSource = "city"
        .cmbcity.Value = ""
        
        Sheets("Support_Data").Range("C2", Sheets("Support_Data").Range("C" & Application.Rows.Count).End(xlUp)).Name = "Project"
        
        .cmbProject.RowSource = "Project"
        .cmbProject.Value = ""

End with

End Sub

标签: combobox

解决方案


推荐阅读