电子表格中,第一个表中有空行,如何把非空行的内容按顺序填入第二个表...

发布网友发布时间：2024-10-05 12:18

共4个回答

热心网友时间：2024-10-05 13:19

复制第一个表的内容到第二个表

在第二个表中，F5——定位条件——空值。

右键空值，删除——整行。

sheet1,VBA代码,运行结果见sheet2

sub a()
dim i& ,j&
for i=1 to [a65536].end(3).row
     if range("A"&i)<>"" then
       sheets(2).range("a"&j)=range("a"&i)
       j=j+1
    end if
next i
end sub

热心网友时间：2024-10-05 13:21

把问题作为内容（邮件主题一定要包含“excel”,本人以此为依据辨别非垃圾邮件，以免误删）、excel样表文件（请特别注意：要03版的(如果是03以后的，把文件“另存为”一下，类型框可以选择03的），把现状和目标效果表示出来）作为附件发来看下 yqch134@163.com

热心网友时间：2024-10-05 13:20

复制过来，然后删除空行！

热心网友时间：2024-10-05 13:18

内容是不是很多？如果多，只能编个宏了