EXCEL如何自动排序(妙)

EXCEL如何自动排序(妙)EXCEL如何自动排序(妙) 这用代码很好解决在你的工作表名称那里——右键——查看代码把下面的代码全部复制进去，就可以了 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then '当A列的数据有改变时 "1"代表A列，"2"代表B列...... i = Selection.Row j = Selection.Column Columns("A:A").Select '选中你要排序的列，这是A列，如...

EXCEL如何自动排序(妙) 这用代码很好解决在你的工作表名称那里——右键——查看代码把下面的代码全部复制进去，就可以了 Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then '当A列的数据有改变时 "1"代表A列，"2"代表B列...... i = Selection.Row j = Selection.Column Columns("A:A").Select '选中你要排序的列，这是A列，如是是ABC三列，则换为"A:C" Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _ :=xlPinYin, DataOption1:=xlSortNormal 'Key1:=Range("A1"), 表示用A列进行排序 'Order1:=xlDescending 对 Key1 按降序排序。 'Order1:=xlAscending 默认值。对 Key1 按升序排序。 Cells(i, j).Select End If End Sub

                    本文档为【EXCEL如何自动排序(妙)】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

你可能还喜欢

最新资料

资料动态

专题动态

is_882336

暂无简介~

格式：doc

大小：11KB

软件：Word

页数：0

分类：互联网

上传时间：2017-09-26

浏览量：10

热点搜索

小学语文《牛和鹅》评课稿共二篇游泳池管理考核制度二年级英语入学测试题钢丝绳夹角受力计算河南省城市医师卫生支农工作鉴定表中考动员大会PPT VRIA电池极群结构的设计与计算-2009 通用门面出租合同范本建筑工程施工图设计评标办法学生会就业部工作总结ppt 让WORD在打印时自动加上打印份数编认识整点站场无线通信系统检测检验批质量验收记录表卫盾数据库审计及防统方系统 PK 美创单一防统方系统小学语文《牛和鹅》评课稿共二篇游泳池管理考核制度二年级英语入学测试题钢丝绳夹角受力计算河南省城市医师卫生支农工作鉴定表中考动员大会PPT VRIA电池极群结构的设计与计算-2009 通用门面出租合同范本建筑工程施工图设计评标办法学生会就业部工作总结ppt 让WORD在打印时自动加上打印份数编认识整点站场无线通信系统检测检验批质量验收记录表卫盾数据库审计及防统方系统 PK 美创单一防统方系统