添加一行,为第一行,并在A1输入1,并选中A1,B1,选中后松开鼠标,点击选区的右下角,并享有拖动填充。
松开鼠标之后,按快捷键“Ctrl+G→定位→空值→确定
在选择区域,点击右键→插入→整列
选中第一行并将第一行清除内容,然后在B1、C1填入数字1,并选中B1、C1、D1,按照第一步,再操作依次,就完成了。
追问 : 好像很强的样子,这是不是vb的代码啊,当初没学好vb啊 追答 : 是。 使用方法是新建起一个宏,将以下代码 Dim x As Integer x = 10 Dim i As Integer For i = 1 To x Cells(1, 2 * i - 1).Select Selection.EntireColumn.Insert Next 复制到 Sub Macro1() End Sub 之间,运行即可。 X=10是我假设你有10列,你有多少列就输入X=多少。
Copyright © 2025 IZhiDa.com All Rights Reserved.
知答 版权所有 粤ICP备2023042255号