大家好,今天跟大家分享如何利用vba代码在Excel工作簿中将工作表标签进行倒序排列。
应用案例
使excel的数据顺序倒过来的操作方法如下:1、下面以简单例子演示下操作方法。比如,下图中表格数据;有7行数据;现在需要把这7行数据,颠倒过来。第7行变成第1行,第6行变成第2行,如此类推。2、我们在A列左侧插入一行。
在下图所示的Excel工作簿“工作簿1.xlsx”中有6张工作表,工作表标签从左到右依次为“6月”“5月”“4月”“3月”“2月”“1月”,接下来我们想将所有工作表标签顺序倒过来,怎么把excel一列数据倒过来,使从左到右依次为“1月”“2月”“3月”“4月”“5月”“6月”。,
操作步骤
3 在新增的“工作簿1.xlsx-模块1(代码)”窗口中输入如下代码:
1、选中A列 2、点击数据-排序中的ZA图表 3、查看效果(已倒序排序好)
Sub 工作表倒序排列()
Dim ws As Excel.Sheets,w As Object,i As Integer
Set ws = ActiveWorkbook.Sheets
For i = 1 To ws.Count
Set w = ws(ws.Count)
w.Move Before:=ws(i)
01 首先,我们打开我们电脑上面的excel,然后我们在里面输入一列数字;02 之后我们选中这些数字的单元
Next i
一、行倒序 比如要把第一行的数据“倒过来”排列: A B C D &。
End Sub
4 单击窗口上方的“运行子过程/用户窗体”按钮(方向向右的绿色三角符号)运行代码。
第一步,打开电脑进入桌面,打开软件进界面。第二步,打开软件进入后,打开相应的文档。第三步,在单元格中输入需要倒数的内容这里输入100,99。第四步,选中两个单元格使用鼠标下拉。第五步,下拉完成后即可完成excel 倒序。
今天的分享就到这里,感谢阅读,欢迎关注,一起学习更多职场办公技能!