Excel [求助]用１个vba在两个单元格做两种排序 - ExcelVBA程序开发 - ...

来源：百度文库编辑：神马文学网时间：2024/04/29 20:34:28

Private Sub Worksheet_Change(ByVal Target As Range)
If replace(activecell.address,"$","")= "C2" Then
    Range("A4:G31").Select
    Selection.Sort Key1:=Range("C4"), Order1:=xlDescending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
        :=xlPinYin, DataOption1:=xlSortNormal
elseif replace(activecell.address,"$","")= "C38" Then
    Range("A40:G67").Select
    Selection.Sort Key1:=Range("C40"), Order1:=xlDescending, Header:=xlGuess _
        , OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        SortMethod:=xlPinYin, DataOption1:=xlSortNormal
   End If
End Sub

range的activate是方法，不是属性

Excel [求助]用１个vba在两个单元格做两种排序 - ExcelVBA程序开发 - ... Excel Excel VBA的常用命令举例 - ExcelVBA程序开发 - Excel... Excel Excel VBA的常用命令举例 - ExcelVBA程序开发 - Excel... Excel vba 里的日期加减函数是？ - ExcelVBA程序开发 - Excel H... Excel VBA排序算法 Excel 职员考勤综合管理窗体 - ExcelVBA程序开发 - Excel Home论... Excel 超级打印高手请进来指导 - ExcelVBA程序开发 - Excel Home... Excel 怎样指定导入数据列？ - ExcelVBA程序开发 - Excel Home论... Excel 工资发放、分栏排版、固定资产折旧(公开部分源码) - ExcelVBA程序开发... 求助：Excel怎么拆分单元格阿？ EXCEL VBA 排序_小糊涂 Excel VBA 300语句集 - Office程序开发 - 办公软件学习网 - Po... 实现Excel单元格按颜色排序三法 EXCEL VBA 基础1 在一个Excel单元格内输入多行内容1 在Excel2007中按单元格颜色进行排序用Eclipse+MyEclipse+WebLogic8.1开发第一个Web程序在一个Excel单元格内输入多行内在excel中合并单元格快捷键 excel单元格 excel单元格 Excel VBA语句集1 Excel VBA入门语句1 换个口味把Excel单元格变得凹凸有致Excel