如何解决Excel VBA-使用公式单元格自动排序
我在Excel单元格中使用公式生成的数据进行自动排序时遇到问题。
此代码有效
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target,Range("J:J")) Is Nothing Then
Range("J1").Sort Key1:=Range("J200"),_
Order1:=xlDescending,Header:=xlYes,_
OrderCustom:=1,MatchCase:=False,_
Orientation:=xlTopToBottom
End If
End Sub
但是问题是,我的表中充满了数组代码。我想将数字射击从最大到最小排序,但是除非值是“输入”数字,否则似乎不进行排序。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。