Vba 如何添加通过组合框输入的数据并添加到excel文件

大家好，我是VBA Excel的新手，请接受我。这是我目前掌握的代码。这是一个有三个输入的组合框1.第2部分。第3个月（Icol）。数量我想让我的组合框查看A列，看看该部分是否位于A列，如果不是，我想将该部分添加到行的底部。除了不在a列中添加新零件外，所有操作都正常。零件会添加到行的底部，但值部分不会添加到行的底部，并且这必须与用户选择的月份相对应，例如新零件，“当前月份+1=N，200。因此，添加新零件并将200添加到N列

专用子cmdAdd_Click（）

对于行值=单元格（iRow，iCol）。值，您需要将整数作为参考，而不是字母

因此，您需要在select语句中使用数字：

Select Case MonthComboBox.value

Case "Current Month"

    iCol = 3

Case "Current Month +1"

    iCol = 14

Case "Current Month +2"

    iCol = 15

Case "Current Month +3"

    iCol = 16

Case "Current Month +4"

    iCol = 17


End Select

---

很抱歉，不确定这是否是问题所在。如果将iCol切换为数字，我的语句中会出现错误，而且我认为情况并非如此，因为当在A列下找到零件时，选择案例有效。当新零件添加到行底部时，选择案例无效。@INOAE字符串值被

单元格接受ode>对象。只需在即时窗口中键入
？单元格（1，“C”）。地址
选择Case MonthComboBox。值Case“Current Month”iCol=单元格（3，“C”）。地址Case“Current Month+1”iCol=单元格（14，“N”）。地址Case“Current Month+2”iCol=单元格（15，“O”）。地址Case”当前月份+3“iCol=Cells（16，“P”）。地址案例“当前月份+4”iCol=Cells（17，“Q”）。地址这是我现在切换的方式，我仍然收到一个调试错误
Select Case MonthComboBox.value

Case "Current Month"

    iCol = 3

Case "Current Month +1"

    iCol = 14

Case "Current Month +2"

    iCol = 15

Case "Current Month +3"

    iCol = 16

Case "Current Month +4"

    iCol = 17


End Select