我已经编写了一个宏来基本上获得一个带有组合框的表格。当用户更改组合框的值时,应该在表格单元格中填充该值
我写过的宏:
Sub Proc1()
Cells(2, 1).Value = "MAT10"
Cells(2, 2).Value = "Material ID (MID)"
Cells(2, 3).Value = "Bulk Modulus(B)"
Cells(2, 4).Value = "Average Density (rho)"
Cells(2, 5).Value = "Speed of sound (C)"
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$2:$E$2"), , xlYes).name = "Tab2"
'No go in 2003
ActiveSheet.ListObjects("Tab2").TableStyle = "TableStyleLight2"
With Range("B3:B3")
Set comb = ActiveSheet.DropDowns.Add(.Left, .Top, .Width, .Height)
End With
With comb
.AddItem "75000000"
.AddItem "75000001"
.AddItem "75000002"
.AddItem "75000003"
.AddItem "75000004"
End With
End Sub
现在,当用户更改组合框的值时,新值应出现在名为" MAT10"的列中的表中。我怎么能这样做?
我知道我们可以通过右键单击组合框来分配宏,但我想以编程方式