加载中…vba改变selection的遍历顺序
(2023-06-06 07:51:54)
For Each cc In Selection.Cells
'遍历顺序默认是先列后行
next
我想把遍历顺序改成先行后列，试试transpose函数看是否可以。
Dim a
a= Application.Transpose(Selection)
For Each cc In a
next
运行结果遍历顺序还是先列后行，与原来相同。
我想再进行一次转置，看是否可以。
Dim a
a= Application.Transpose(Selection)
a= Application.Transpose(a)
For Each cc In a
next
居然可以了！
喜欢
0
赠金笔
后一篇：劳务报酬计算器