题目
如何在excel中多行的每行下添加多行.如原来有100行已输入数据,现在我要在每行下增加5行空白行.
提问时间：2021-04-08
答案
先按下alt + F11
在弹出来的VBE窗口中,点上面的“插入”---模块--在下面的窗口中复制粘贴下面的代码
Sub qgrmdtj()
w = Range("a65536").End(xlUp).Row
For i = 4 To 6 * w Step 6
For j = 1 To 5
Rows(i).EntireRow.Insert
Next
Next
End Sub
之后按下 F5 运行代码即可
注:条件是你的数据是从A列开始的,从第一行向下的
在弹出来的VBE窗口中,点上面的“插入”---模块--在下面的窗口中复制粘贴下面的代码
Sub qgrmdtj()
w = Range("a65536").End(xlUp).Row
For i = 4 To 6 * w Step 6
For j = 1 To 5
Rows(i).EntireRow.Insert
Next
Next
End Sub
之后按下 F5 运行代码即可
注:条件是你的数据是从A列开始的,从第一行向下的
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1,一个数是11的倍数,它除于3余2,除余5余4,除于7余6,除于9余8,这个数是多少呢?
- 2羟基能电离出氢离子,那为什么醇类无酸性
- 3青山果园有苹果树900棵,梨树的棵树是苹果树的3分之2,是桃树的5分之4,桃树有多少棵?
- 4Africans dance to show their feeling同意句改写 Africans dance( ) ( )they can show their feelings
- 5(2x-1)(1-x)/x+2≥0与4-x²/x²-2x-8≤0怎么解
- 6质量分别为25克,40克,10克那么它们的密度之比是多少啊,还有体积之比
- 7急求关于健康的英语演讲稿
- 8英语句子有无错误
- 9你会弹吉他吗?（翻译）
- 10中国人可敬短文中有两对近义词是什么
热门考点
- 11元=100分=10分*10分=0.1元*0.1元=0.01元=1分,那为什么1元=1分
- 2早点休息的英语怎么说吗?
- 3假期小红、小明、小亮都去图书馆借书，小红每4天去一次，小明每6天去一次，小亮每3天去一次，7月6日三人第一次在图书馆见面，几月几日他们会第二次相遇呢？
- 4一块土豆.完全浸没在长40厘米,宽30厘米,深25厘米的玻璃水缸中.
- 5第一个盒子里有5个红球,4个白球,第二个盒子里有4个红球,5个白球.先从第一个盒子中任取2个球放入第二个
- 6某商场为招揽顾客举办购物抽奖，奖金有三种：一等奖1000元，二等奖250元，三等奖50元．共有100人中奖，奖金总额为9500元，问其中二等奖有几名？
- 7注意安全~是不是pay attention to safety?
- 8四氧化三铁中铁的化合价是多少?为什么?
- 9已知y=x+a，当x=-1，0，1，2，3时对应的y值的平均数为5，则a的值是（ ） A.185 B.195 C.4 D.215
- 10高中数学必修一集合