Question

excel VBA代码如何写？如图。关于listbox和combobox的联系。

Answer 1

SetRng=sht.Range("A;A").Find(ComboBox1.Value,,,xlWhole) '查找列表框的值Range("A;A")不能这么写吧，况且中间好像还写的是分号，只见过Columns("A:A")这种写法。如果第一行为标题行的话，应该这样写：iMaxRow = sht.Range("A65535").End(xlUp).RowSet Rng = sht.Range("A2:A" & iMaxRow).Find(ComboBox1.Value, , , xlWhole)

追问

请帮我按照说明之要求完整地把代码写出来，谢谢你