[已解决]这句代码怎么不行

9910343

.Cells(Mr, 11).Formula = "=IF(.cells(Mr,5)-.cells(Mr,4) > 0,.cells(Mr,5)-.cells(Mr,4),"")"

最佳答案

月排行榜 / 总排行榜

兰色幻想

2013-3-13 15:50

.Cells(MR, 11).Formula = "=IF(E" & MR & "-D" & MR & "> 0,E" & MR & "-D" & MR & ","""")"

跳转到最佳答案楼层

E路人

.Cells(Mr, 11).Formula = "=IF(.cells(Mr,5)-.cells(Mr,4) > 0,.cells(Mr,5)-.cells(Mr,4),"")"
.Cells(Mr, 11).Formula = "=IF(A5-A4 > 0,A5-A4,0)“  代码要在单元格中显示，常规方式就行

9910343

E路人 发表于 2013-3-13 15:47
.Cells(Mr, 11).Formula = "=IF(.cells(Mr,5)-.cells(Mr,4) > 0,.cells(Mr,5)-.cells(Mr,4),"")"
.Cells(M ...

行数是不确定的，行数是根据.Cells(Mr, 11).

兰色幻想

.Cells(MR, 11).Formula = "=IF(E" & MR & "-D" & MR & "> 0,E" & MR & "-D" & MR & ","""")"

兰色幻想

变量不能放在引号里

9910343

兰色幻想 发表于 2013-3-13 15:50
.Cells(MR, 11).Formula = "=IF(E" & MR & "-D" & MR & "> 0,E" & MR & "-D" & MR & ","""")"

.Cells(Mr, 11).Formula = "=IF(E" & Mr & "-D" & Mr & "> 0,E" & Mr & "-D" & Mr & ","""")"
.Cells(Mr, 11).Formula = "=IF(E" & Mr & "-D" & Mr & "> 0,E" & Mr & "-D" & Mr & ","")"
在单元格里=IF(E2-D2>0,E2-D2,"")只需要2个",在代码里怎么需要4个"

兰色幻想

在vba里，要输出的结果是"时，要加倍输入

9910343

兰色幻想 发表于 2013-3-13 16:34
在vba里，要输出的结果是"时，要加倍输入

谢谢谢谢谢谢谢谢

风林火山

学习了