请求用代码删除有规律的行

fdxxhjc

请教先生，我有一个420行6列的电子表，现在想将第4、5行，第9、10行，第14、15行......这种规律的行用vba代码删除，请教在宏中的代码如何编写，谢谢

Benjamin_luk

这个简单得很，
基本不用VBA
=IF(MOD(ROW(A3),5)=0,"删除",IF(MOD(ROW(A3)+1,5)=0,"删除"))
一个公式就可以标记哪些行需要删除了。

roych

Benjamin_luk 发表于 2017-2-28 10:56
这个简单得很，
基本不用VBA
=IF(MOD(ROW(A3),5)=0,"删除",IF(MOD(ROW(A3)+1,5)=0,"删除"))

为什么不用or呢？用or应该不需要嵌套吧？