如何在VBA列表框之上显示最新数据 [英] How to show the latest data on top of the VBA Listbox

问题描述

嗨！

如何在不点击任何按钮的情况下自动显示列表框中的最新数据？

例如：

a

s

d

f

g

TO：

g

f

d

s

a

谢谢

解决方案

您好

Hi!

How do you automatically show on top your latest data on your listbox without clicking any button?

For example:

a

s

d

f

g

TO:

g

f

d

s

a

Thanks

解决方案

Hi petert_neil,

refer example below.

Private Sub Worksheet_Change(ByVal Target As Range)
    Sheets(1).ListBox1.Clear
    Dim TotalRows As Long
    Dim i As Long
    
    TotalRows = Rows(Rows.Count).End(xlUp).Row
    For i = TotalRows To 1 Step -1
   
    Sheets(1).ListBox1.AddItem (Range("A" & i).Value)
    Next i
End Sub

Output:

Regards

Deepak

这篇关于如何在VBA列表框之上显示最新数据的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！