我一直在考虑如何在组合框中对值进行排序.
我在初始化表单时向ComboBox添加项目,因为值的数量在工作表上不断增加.
我使用下一个代码来添加项目:
With ComboBox1
lastcell = ThisWorkbook.Sheets("1").Range("F1000000").End(xlUp).Row + 1
For i = 2 To lastcell
.AddItem ThisWorkbook.Sheets("1").Cells(i, 6)
Next i
End With
我想将我要添加到ComoBox上的值复制到另一张表并在新表中对它们进行排序,它工作正常但它似乎不是一个聪明的选项,这意味着我创建了另一张表然后复制值并对其进行排序,而不是直接对它们进行排序.
我的问题是,任何人都知道如何直接从原始表格中做到这一点？我不知道任何API,所以,请,只有VBA代码.我alredy检查MSDN但我无法弄清楚如何使其工作.
谢谢,如果需要更多信息,请告诉我.
PS:我无法直接从原始工作表中对它们进行排序,因为此工作表必须具有静态顺序