'Option Explicit
Sub Arraylist ()
Dim a
A=Application. Transpose (Sheet1. Range (" a1: a10))
The Set objArrayList=CreateObject (" System. Collections. The ArrayList ")
For I=1 To 10
ObjArrayList. Add a (I)
Next I
objArrayList. Sort 'even as the ACCESS & lt; Corresponding position & gt; Order together!!!!!
For I=0 To objArrayList. Count - 1
The Debug. Print objArrayList. Item (I)
Next
End Sub [/size]
[url=http://club.excelhome.net/thread-1341679-CodePudding user response:
What do you want to directly call system in the VBA. The.net type library (or: create the.net type library objects)?Probably you go the wrong door!!!!!!
CodePudding user response:
In fact you can use!CodePudding user response:
I'm sceptical, open the Excel, wrote a few words of code to test...Dizzy, I didn't think it can create objArrayList this object,
But I never use the.net thing, can't help you,
However, I think you don't have to use it, just use Excel their sorting, should can handle,
Record Duan Hong, then extract the key code,