[已解决]求帮改一小代码：被误输入空格时也算为空

hwc2ycy

jsdtxin 发表于 2014-3-21 13:58
嗯，刚测试了下，版主这个是可行的，但能不能写成*******""的形式呢？

1. Sub test()
   
2.     If Trim(Cells(13, 3).Value) <> "" Then
   
3.              Cells(13, 4) = 88
   
4.     Else
   
5.              Cells(13, 4) = ""
   
6.     End If
   
7. End Sub
   

复制代码

jsdtxin

hwc2ycy 发表于 2014-3-21 14:08

谢谢了，我是新手，