Question

excel中用VBA写程序,其中一行赋予单元格公式,但执行时会出现一个对话框"更新值:总表",如何让这对话框不出

语句如下 Range("I3") = "=if(g4=0,"""",text(g4," & Chr(34) & "yymmdd" & Chr(34) & ")&text(count(转账凭证-总表!a4:a65536)," & Chr(34) & "000" & Chr(34) & "))" 补充说明:我在sheet2执行这个宏(公式用意为替凭证号自动编码),而转账凭证-总表为sheet3.请诸路高手帮我解决这个问题,谢谢!!
语句前后加了Application.Ask........,对话框还是跑出来...

Answer 1

在你语句的前面加上：
Application.AskToUpdateLinks = False

结束时设置回来：
Application.AskToUpdateLinks = True

希望能帮到您。

Answer 2

告诉你一个方法，录制新宏，内容为在i3单元格输入你的公式。这样你就可以在宏里复制使用它了。