VBA计算插入的行

时间:2015-02-04 12:26:30

标签: excel vba

我正在制作一个包含适用于某些范围的各种宏的调度工作表。工作表当前设置为大多数日子应该有足够的行,但偶尔可能需要更多。

目前,当添加(或删除)一行时,宏不会考虑这个并且范围保持不变,如果可能的话我希望它考虑添加的行。这是我的一个宏的例子 -

Sub Print1st()

'

' Print1st Macro

X = Application.Dialogs(xlDialogPrinterSetup).Show

If X = False Then Exit Sub 

Range("A1:N40").PrintOut
Range("A4").Select

End Sub

因此,例如,如果插入两行,我希望它引用A1:N42,这样当它打印时它仍然打印所有内容而不是切断两行。如果没有,我可以阻止用户插入行,如果不够则稍后进行调整。

感谢您的帮助!

1 个答案:

答案 0 :(得分:1)

您可以在GUI或代码中命名范围:

Range("A1:N40").Name = "printRange"

在该范围内的用户插入(未粘贴)行将扩展范围,因此在添加行Range("printRange")后现在A1:N41