如何通过VBA每5行后插入行
在本文中,我们将学习如何通过Microsoft Excel中的VBA在每第5 ^ th ^行之后插入行。
让我们举个例子来理解:
我们具有范围A1:F31中的数据,其中A列包含姓名,B列包含街道地址,C列城市,D列包含地区,E列包含国家名称,F列包含电话号码。
我们要在数据的第五行之后插入行,请按照以下给定的步骤和代码进行操作:打开VBE页面以按Alt + F11键。插入模块以编写代码*编写以下代码:
Sub InsertIT() x = 2 'Start Row Do Range("A" & x, "F" & x).Insert x = x + 5 Loop While x < 50 End Sub
代码说明:
首先,我们从要插入行的位置定义了行号。然后,我们定义了要插入数据的范围。然后,我们定义了要在多少行之后插入行的编号。然后直到哪一行,将插入行。
要运行代码,请按键盘上的F5键。
-
将插入行直到数据
中的第50 ^ th ^行这样,我们可以在可以在宏中定义的特定数字之后插入行。
如果您喜欢我们的博客,请在Facebook上与您的朋友分享。您也可以在Twitter和Facebook上关注我们。
我们很高兴收到您的来信,请让我们知道我们如何改进,补充或创新我们的工作,并为您做得更好。写信给我们[email protected]