发布网友 发布时间:2022-02-20 02:10
共4个回答
热心网友 时间:2022-02-20 03:40
1、在A列左边插入一辅助列,依次输入1、2、3……;1.1、2.1……;1.11、2.11……
2、选A1单元格,点击“数据”、“升序”。最后删除辅助列。这样,每一行后都插入了两空白行。
热心网友 时间:2022-02-20 04:58
想插入几行,就选中几行的行标,右键插入行,插入列同理。
热心网友 时间:2022-02-20 06:32
Sub aa()
Columns("a:b").Insert Shift:=xlToRight
End Sub
在该sheet表a列前面插入两行 具体你需要怎么做 请追问
热心网友 时间:2022-02-20 08:24
宏代码
Sub 插入行()
On Error Resume Next
Dim n As Long, i As Long
n = InputBox("插入行的行数", "", 0)
For i = 1 To n
Selection.EntireRow.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Next
End Sub
Sub 插入列()
On Error Resume Next
Dim n As Long, i As Long
n = InputBox("插入行的行数", "", 0)
For i = 1 To n
Selection.EntireColumn.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Next
End Sub