У меня есть лист Excel с кнопкой Вставить строки.
Я разделил свой шаблонный лист на три секции диапазонов (финансы, операции, технология), каждый из которых теперь состоит из двух строк.Когда пользователь вставляет строки (пользователь может вставить столько строк, сколько ему нужно, на ходу), все эти строки должны быть вставлены в диапазон, в котором в данный момент находится пользователь.
Таким образом, по сути, это изменение размера.Но я не могу найти общий код, который будет работать для моего другого раздела диапазонов.
Есть ли способ определить динамические диапазоны с помощью диспетчера имен в листе Excel и заставить мой текущий код работать с ним?Пожалуйста, помогите.
enter code here
Sub Insert_rows()
Dim xCount As Integer
LableNumber:
xCount = Application.InputBox("Number of Rows", "Kutools for Excel", , , , , , 1)
If xCount < 1 Then
MsgBox "the entered number of rows is error, please enter again", vbInformation, "Kutools for Excel"
'GoTo LableNumber
End If
ActiveCell.EntireRow.Copy
Range(ActiveCell, ActiveCell.Offset(xCount - 1, 0)).EntireRow.Insert Shift:=xlDown
Range(ActiveCell.Offset(1, 0), ActiveCell.Offset(xCount, 0)).EntireRow.Validation.Delete
Application.CutCopyMode = False
End Sub