【发布时间】:2012-01-25 01:25:35
【问题描述】:
我正在尝试按特定列中数据的降序排列 7 行。
Excel 电子表格中的数据如下所示:
Name---Actual----Budget---Budget%
Name1--$2000-----$5000--------40%
Name2--$5000-----$4000-------110%
等等……
我想按 'Budget%' 列的降序排列行。
到目前为止我的代码是:
Dim objExcel As New Excel.Application
Dim objWorkbook As Excel.Workbook
Dim objSheet As Excel.Worksheet
objExcel.WindowState = Excel.XlWindowState.xlMinimized
objExcel.Visible = False
objWorkbook = objExcel.Workbooks.Open("C:\LLG\template.xlsx")
objSheet = objWorkbook.Worksheets(1)
'CODE HERE PLACES DATA INTO CELLS ON SPREADSHEET
objSheet.Rows.Sort(column(4))
我省略了将数据放入单元格的代码,因为它运行良好,只是 objsheet.rows.sort(column(4)) 完全错误。
任何帮助将不胜感激。
【问题讨论】: