[已解决]vba中一个IF代码的问题

suxiong

条件为：
A1，A2，A3如果都不为空的话，那么A4等于A1+A2+A3的值

否则提示“条件不满足”

我的代码是：

1. 
   
2. 
   
3. If [a1] <> "" And [a2] <> " " And [a3] <> " " Then
   
4. Range("A4") = Range("a1") + Range("a2") + Range("a3")
   
5. Else
   
6. MsgBox "条件不满足"
   
7. End If

复制代码

可以运行，但是三个单元格有一个为空或两个为空还是可以计算的。就不满足我的条件了。

求代码，谢谢！在线等

最佳答案

月排行榜 / 总排行榜

mxg825

2011-11-28 22:51

If [a1] <> "" And [a2] <> " " And [a3] <> " " Then

红色地方，还留一个空格，所以条件才出错

跳转到最佳答案楼层

mxg825

If [a1] <> "" And [a2] <> " " And [a3] <> " " Then

红色地方，还留一个空格，所以条件才出错

suxiong

mxg825 发表于 2011-11-28 22:51
If [a1]  "" And [a2]  " " And [a3]  " " Then

红色地方，还留一个空格，所以 ...

晕死，谢谢！！！

byhdch

路过，学习学习......