将行从一个表复制到另一个表

假设我在excel中有一个包含1000行和10列的表。 我怎样才能从这张表中的第7行复制到一个新的表,其第一行将是这第七行,第二行将是该表第十四行,依此类推。

以前我从来没有做过这样的事情。 怎么做?

如果你想坚持使用普通的Excel(没有VBA)。 在表格的最后添加两列。 第一个是线的计数,如果行数可以被7整除,则第二个标记 – 我使用公式= IF(MOD(D4,7)= 0,“可以被7”,“ – ”整除)。

在这里输入图像描述

然后过滤“标记每7个项目”列中的表格,并复制并粘贴到新表格。

你需要一个macros。 按alt + F11

基本上你运行这样的macros

sub Copyer() dim I as integer Dim K as integer I = 7 K = 1 while (Activesheet.Range("A" & I ).Value <> "") DestinationSheet.Range("A" & K ).Value = Activesheet.Range("A" & I).Value K = K + 1 I = I + 7 Loop End Sub 

代码可能需要一些修饰,但这是主意