2,462
社区成员
发帖
与我相关
我的任务
分享VBA 工作表根据工作表名排列
VBA的同学们，求问一个问题解答。
假如工作簿里面有5个工作表， 工作表名一开始的排列顺序分别是， 张三、李四、小米、林林、分分
如果我要写个VBA代码一键，不管开始的工作表排序是如何的，按下代码能变成如下的排序。
林林、李四、小米、张三、分分。
该如何写VBA代码，请大神赐教
假如工作簿里面有5个工作表， 工作表名一开始的排列顺序分别是， 张三、李四、小米、林林、分分
如果我要写个VBA代码一键，不管开始的工作表排序是如何的，按下代码能变成如下的排序。
林林、李四、小米、张三、分分。
该如何写VBA代码，请大神赐教
...全文
请发表友善的回复…
发表回复
baidu_39174339 2017-06-21
- 打赏
- 举报
谢谢大神。跪谢
X-i-n 2017-06-21
- 打赏
- 举报
Dim arrList()
arrList() = Array("林林", "李四", "小米", "张三", "分分")
For i = UBound(arrList) - 1 To 0 Step -1
Sheets(arrList(i)).Move Sheets(arrList(i + 1))
Next i