VBA中listbox 如何自动更新？
ListBox 控件显示项目列表，从其中可以选择一项或多项。如果项目总数超过了可显示的项目数，就自动在 ListBox 控件上添加滚动条。如果未选定项目，则 ListIndex 属性值是 -1。列表的第一项是 ListIndex 0，ListCount 属性值总是比最大的 ListIndex 值大 1。
语法ListBox
说明使用 AddItem 或者 RemoveItem 方法可以添加或者删除 ListBox 控件中的项目。对 List、ListCount 和 ListIndex 属性进行设置就可以访问 ListBox 中的项目。也可以在设计时使用 List 属性在列表中增加项目。
实例
Dim Entry, I, Msg ' 声明变量。 Msg = "Choose OK to add 100 items to your list box." MsgBox Msg ' 显示信息。 For I = 1 To 100 ' 计数值从 1 到 100。 Entry = "Entry " & I ' 创建输入项。 List1.AddItem Entry ' 添加该输入项。 Next I Msg = "Choose OK to remove every other entry." MsgBox Msg ' 显示信息。 For I = 1 To 50 ' 确定如何 List1.RemoveItem I ' 每隔一项 Next I ' 删除。 Msg = "Choose OK to remove all items from the list box." MsgBox Msg ' 显示信息。 List1.Clear ' 清除列表框。
你的描述不清晰，也没有图片说明，请把问题再详细追问一下。
百度提问页面的顶端可以看到“我要提问”，要描述清楚您的问题，为了更好地得到答案，可通过文字、截图，对问题进行更详细的描述并悬赏！
range("A1:A"&range("A65536").end(xlup).row)替换你原来的range("A1:A8")
不明白，附段代码，给你看看
柘策包醛： 在你的listbox初始化时,设置的不要固定区域,而是用动态的区域 range(＂A1:A＂&range(＂A65536＂).end(xlup).row)替换你原来的range(＂A1:A8＂)
长垣县13256197753： vb.net中listbox内容自动换行如何实现 - ？
柘策包醛： 、首先选中拖至面板的ListBox控件,点属性,选中DrawMode,改成OwnerDrawFixed或OwnerDrawVariable 2、还是在属性工具中,切换到事件(就是那个闪电图标),鼠标双击'行为'菜单下的DrawItem,添加一个事件. 3、在'窗体设计器生成的代码'中就添加了一个新的事件 this.listBox1.DrawItem += new System.Windows.Forms.DrawItemEventHandler(this.listBox1_DrawItem); 4、在事件中添加代码,你自己通过文字的长度和文字的高度,计算每一列的宽度,进行设置.
长垣县13256197753： VB的listbox如何实现自动滚动? - ？
柘策包醛： 添加一个Timer1控件Private Sub Timer1_Timer() If List1.TopIndex < List1.ListCount - 1 Then List1.TopIndex = List1.TopIndex + 1 '-1 Else List1.TopIndex = List1.List(0) End If End Sub
长垣县13256197753： VB里面的listBox控件怎么用啊? - ？
柘策包醛： listBox是用来显示列表数据的控件他的主要属性如下:设已知控件为list1list1.list为列表中显示的相关数据list1.Backcolor为列表的背景颜色list1.Forecolor为他的字体颜色list1.front为他...
长垣县13256197753： excel 2003 vba 控件自动变形 - ？
柘策包醛： 你在调用填充数据的代码后面加两句定义一下ListBox的Height和Width属性就可以了
长垣县13256197753： VB listbox将指定值的项自动选中 - ？
柘策包醛： For i = 0 To List1.ListCount - 1 If List1.List(i) = ＂abc＂ Then List1.Selected(i) = True Next list1的Style属性设置成1,即有checkbox.
长垣县13256197753： vba listbox控件 怎么设置能拖动中不改变选中项,只有点击能改变? - ？
柘策包醛： 非常简单:使用List1的MouseDown事件就可以了,例如:Private Sub List1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Label1.Caption = List1.List(List1.ListIndex) End Sub 在按下鼠标时,Label1.Caption就显示了按下是的List1的List,不会按拖动而改变.
长垣县13256197753： vb.net 修改listbox选择项 - ？
柘策包醛： 你可以这样更新item:建立一个字符串数组包含所有的item项;需要更改时就更该这个数组的里里面的项,这个很容易;用listbox.clearitem来清理里面所有的选项;然后用listbox.addrange来重新添加所有的项.读取中文出现乱码是因为你读取时采用的是哪种格式,一般是utf8.
长垣县13256197753： vb中listbox 数据怎么刷新? - ？
柘策包醛： 删除的话listbox会自动刷新
长垣县13256197753： vb里listbox的用法,用text1和text2填入listbox,然后双击listbox里面填入的选择这项来确定？
柘策包醛： 用两个listbox,一个存zhanghao,一个存mima(不显示,visible=false) private sub command1_click msgbox ＂zhanghao:＂ & list1.text & vbcrlf & ＂mima:＂ & list2.list(list1.listindex) end sub private sub list1_click text1=list1.text text2=list2.list(list1.listindex) end sub
