vba如果comboboxselect等于“位置”,则写入“Loc”

我需要为comboboxselect分配一个代码。 所以我的combobox有位置列表。 如果select美国,那么美国是写在数据库中,如果英国,那么英国,如果菲律宾,那么PH。 我不知道如何把这个到一个VBA代码,因为我必须结合这个另一个combobox的值像一个string。

.Cells(iRow, 2).Value = cmbLoc.Value & "_" & cmbProg.Value 

其中cmbLoc是我需要帮助的combobox。

假设您的表位于Info工作表,其中国家是列A和列B中的代码,更新您的代码为:

  Dim sCode as String sCode = Worksheets("Info").Columns(1).Find(cmbLoc.Value,lookat:=xlWhole).Offset(,1) .Cells(iRow, 2).Value = sCode & "_" & cmbProg.Value 

请记住,我没有做任何错误检查,所以我认为国家将永远在那里。 另外,如果您愿意,也可以使用Application.WorksheetFunction.Vlookup