查看会员资料
用 户 名:d****
发送消息- Email:用户隐藏
- Icq/MSN:
- 电话号码:
- Homepage:
- 会员简介:
最新会员发布资源
AnHangPaiXu
- 大家都知EXCEL只能按列排序, 此代码能让EXCEL实现按行排序的功能-Sub Macro1() Dim i As Integer For i = 2 To Sheet1.Range("a65535").End(xlUp).Row Rows(i).Select Application.CutCopyMode = False Selection.Copy Sheets("Sheet2").Select Range("A