作者fishandrian (哇斋啦)
看板Office
标题[算表] 每列单独排序
时间Sat Aug 15 02:08:15 2020
大大们好
目前录了一个横向排列的巨集，但不会写回圈执行到10000列，只能用取代的方式把录到的巨集
改写。
请问该怎麽让巨集可以执行到10000列呢？
http://i.imgur.com/uhD11vk.jpg
谢谢各位QQ
ps:小弟不会写巨集，如果可以请告诉我要在哪边加回圈，摸了好久只能来求救。
-----
Sent from JPTT on my Samsung SM-A7050.
--
※ 编辑: fishandrian (111.251.77.129 台湾), 08/15/2020 02:11:55
1F：→ soyoso: 回圈包巨集....sortfields.clear到end with，回圈所用到的08/15 07:53
2F：→ soyoso: 变数值用於range("A1:D1")，来取代列号1的部分，字串连接08/15 07:53
3F：→ soyoso: 上用&，如"a" & 变数 & ":d"....，或是变数值用於range.08/15 07:53
4F：→ soyoso: offset列偏移上08/15 07:53
http://i.imgur.com/PQhrmsp.jpg
S大好，这一串他说只有next 没有for 是不是设定哪边错了？
然後列偏移在这一段程式里的作用我应该接在哪边（或者 不用加？）
感谢解惑！
※ 编辑: fishandrian (111.251.77.129 台湾), 08/15/2020 10:21:27
5F：→ soyoso: 回文的包，指的是回圈以for...next的话，就是08/15 10:27
6F：→ soyoso: for i =1 to 10008/15 10:27
7F：→ soyoso: ....sortfields.clear08/15 10:27
8F：→ soyoso: .... 08/15 10:27
9F：→ soyoso: with ...08/15 10:27
10F：→ soyoso: end with08/15 10:27
11F：→ soyoso: next08/15 10:27
12F：→ soyoso: range("a" & 变数 & ":d"...)或range.offset 择一使用就好08/15 10:27
我的老天！成功了，谢谢大大！！！！！
※ 编辑: fishandrian (111.251.77.129 台湾), 08/15/2020 10:41:33