如何使用VBA在Excel中逐列插入空白栏
来源:网络收集 点击: 时间:2024-07-27【导读】:
如何使用VBA在Excel中逐列插入空白栏呢?下面我来操作演示一下,希望对大家有用!品牌型号:联想ThinkPad X13系统版本:Windows7或10软件版本:Excel2016方法/步骤1/6分步阅读
2/6
3/6
4/6
5/6
6/6
注意事项
打开一个演示表格,下面操作将会在每列后面插入空白栏;

按组合按键【Alt+F11】调出VBA编辑器,插入宏取名为【逐列插入空白栏】;

定义变量保存最大列数(maxcol = ActiveSheet.UsedRange.Columns.Count);

通过循环语句依次遍历栏(For i = maxcol + 1 To 3 Step -1 Next),插入的过程实际是移动的过程,将列向后移动一列,因为第一列不;

在循环体内插入动态移动语句(Columns(i).Insert xlShiftToRight, xlFormatFromRightOrBelow);

执行宏,得到逐栏空白间隔的表格。

Tips:如有错误,欢迎指正;欲知更多相关信息,请关注我!
插入空白栏版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_1014955.html