2011-09-09 108 views
0

我想从Excel工作表中取出列并对其进行排序。假设我有一个列A,其值为a,b,c,d,e,f,另一列B的值为3,5,6,1,5,6。我想使用列B的值对列A和列B进行排序。我在VBA中没有声音。所以我被困在了两栏,并从excel表格中排序出来。现在,泡泡对我来说已经足够了。需要帮助排序excel列值

enter image description here

我想排序列A和B使用B值

+0

数据>排序。或者你需要在vba中做到这一点? – Kevin

+0

我需要做的是在VBA – rokonoid

回答

1

的这应做到:

Range("A2:B10").Select 
Selection.Sort Key1:=Range("B:B"), Order1:=xlAscending 

要放置排序列的A值列C(留下一个不受干扰) :

Range("C2:C10").Value = Range("A2:A10").Value 
Range("B2:C10").Select 
Selection.Sort Key1:=Range("B:B"), Order1:=xlAscending 
+0

昏暗的WS作为工作表设置 WS =工作表(“PartsData”) ws.Range(“A1:B2”) 不工作...不知何故收到错误 – rokonoid

+0

@rokonoid我不知道是什么你指的是这里。这是什么声明? – America

+0

谢谢。它工作很好..如果我想要显示排序结果在另一列如何..谢谢 – rokonoid