Excel VBA-将条件项添加到多个组合框

Question

在Excel 2013中我的工作表的C列中，我列出了我公司销售的项目类别。在列D的每个单元格中是组合框。 C栏中有“饼干”，“蛋糕”，“松饼”等物品（显然有数百种不同的物品）。 在K和L列中，我有一个类别和选项列表。有没有办法为所有组合框制作条件公式？类似的东西：

Sub ComboBoxLoad()

For i = 1 To 30
With "combobox" & i
If Range("K2") = Range("C" & i) Then
.AddItem Range("L2")
End If
End With
With "combobox" & i
If Range("K3") = Range("C" & i) Then
.AddItem Range("L3")
End If
End With
With "combobox" & i
If Range("K4") = Range("C" & i) Then
.AddItem Range("L4")
End If
End With
With "combobox" & i
If Range("K5") = Range("C" & i) Then
.AddItem Range("L5")
End If
End With
With "combobox" & i
If Range("K6") = Range("C" & i) Then
.AddItem Range("L6")
End If
End With
Next

End Sub

非常感谢你！