专家坐堂-如何避免EXCEL空的单元格不被赋值？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何避免EXCEL空的单元格不被赋值？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=66172)

--  作者：南望
--  发布时间：2015/3/31 16:01:00
--  如何避免EXCEL空的单元格不被赋值？

如何在下面这个语句中加上判断不处理空的单格元，否则所有空的单元格都被替换成“分号”了

If dic.ContainsKey(Sheet1(i, j).Text) Then
    Sheet1(i, j).value = Sheet1(i, j).Text & ";" & dic(Sheet1(i, j).Text)
End If

--  作者：有点甜
--  发布时间：2015/3/31 16:02:00
--

If Sheet1(i, j).Text > "" AndAlso dic.ContainsKey(Sheet1(i, j).Text) Then
    Sheet1(i, j).value = Sheet1(i, j).Text & ";" & dic(Sheet1(i, j).Text)
End If

--  作者：南望
--  发布时间：2015/3/31 16:32:00
--
问题解决，谢谢