按列对表格单元格进行排序-VB

时间:2019-07-17 09:27:55

标签: excel vba

我尝试根据已知列(C)对Excel中的表字段(A-H列)进行排序。要排序的数据以C3开头,并包含一个标题。 (标题无所谓) 该表是从RPG LE中的代码获得的。 我在代码中有给定的范围(随程序而异)-TEMP。

endOutputRow = outputRow - 1
   TEMP = "A" + LTrim(Str(startOutputRow)) + ":H" + LTrim(Str(endOutputRow))           
   Set tableRange = outputSheet.Range(TEMP)
   SetBorderToOutputTable tableRange

   Dim LastRow As Long
   LastRow = (Cells(Rows.Count, 1).End(xlUp).Row) - 1

   Range(TEMP).Sort Key1:=Range("C3" & 
   LastRow),Order1:=xlAscending,Header:=xlYes

通过编写此代码,列会更改,但顺序不正确。

感谢您的帮助

0 个答案:

没有答案