在excel中，用vba实现:在任意位置插入一行后，该行能自动复制上一行的所有公式及格式

大大白兔 · 发表于 2012-1-28 20:14

KCFONG 发表于 2012-1-23 00:04
Sorry I had missed 1 line

Private Sub Worksheet_Change(ByVal Target As Range)

太感谢了！问题解决！！

海达装潢 · 发表于 2012-10-11 11:57

KCFONG 发表于 2012-1-23 00:04
Sorry I had missed 1 line

Private Sub Worksheet_Change(ByVal Target As Range)

为什么删除了行还是会有是空白行在呢

wr1207 · 发表于 2013-8-12 11:26

我来试试看啊，

I_miss_you_too. · 发表于 2013-10-10 16:47

解决了吗，我也有同样的需求，不会写啊

CJXUEHAO · 发表于 2014-4-29 11:11

doitbest 发表于 2012-1-20 17:13
请参考附件

请问，能不能实现只复制有公式的，其他没公式或者自定义名称的单元格保持空值呢？

上善若水888882 · 发表于 2014-4-29 11:37

KCFONG 发表于 2012-1-23 00:04
Sorry I had missed 1 line

Private Sub Worksheet_Change(ByVal Target As Range)

能不能改个放在ThisWorkbook里的代码，对整个工作薄里的工作表都起作用的呢？谢谢！

上善若水888882 · 发表于 2014-4-29 15:49

KCFONG 发表于 2012-1-23 00:04
Sorry I had missed 1 line

Private Sub Worksheet_Change(ByVal Target As Range)

老师能否将我附件里的公式全写进VBA代码来实现？单位同事在使用时，有时间需要删除或插入行，老是弄坏公式，我不会VBA，所以想烦请帮我改改，谢谢了。

KCFONG · 发表于 2014-4-29 19:35

SEE IF HELP YOU

I COPY ROW 7 'S FORMULA TO AFFECTED ROW

上善若水888882 · 发表于 2014-4-29 20:22

KCFONG 发表于 2014-4-29 19:35
SEE IF HELP YOU

I COPY ROW 7 'S FORMULA TO AFFECTED ROW

谢谢您的帮助，可以实现每个单元格不再显示公式，直接填写结果吗？

KCFONG · 发表于 2014-4-29 21:09

see if fit your request

		自动登录	找回密码
密码			免费注册

[求助] 在excel中，用vba实现:在任意位置插入一行后，该行能自动复制上一行的所有公式及格式