标题:如何判断WORD表格某单元格为空值
只看楼主
王咸美
Rank: 1
等 级:新手上路
帖 子:569
专家分:0
注 册:2018-1-4
结帖率:96.99%
已结贴  问题点数:20 回复次数:15 
如何判断WORD表格某单元格为空值
如何判断下表第2行第6列为空值,用VFP代码如何写,请高手赐教,万分感谢!!!
五(1)班成绩.rar (53.86 KB)

搜索更多相关主题的帖子: 判断 WORD 表格 单元格 为空 
2021-12-22 07:52
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:0 
读取出来看看是什么内容
2021-12-22 09:58
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:190
帖 子:3125
专家分:8340
注 册:2015-3-25
得分:0 
读出来后,WORD本来是空的,在VFP好像不是空,应该还多了回车符。
2021-12-22 11:28
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:190
帖 子:3125
专家分:8340
注 册:2015-3-25
得分:0 
oDocapp = CREATEOBJECT("Word.application")
oDoc = oDocapp.Documents.Open('c:\五(1)班成绩.doc')

tab1 = oDoc.Tables(1)
r1c6 = ALLTRIM(tab1.Cell(1, 1).Range.Text)
r2c6 = ALLTRIM(tab1.Cell(2, 6).Range.Text)

?SUBSTR(r1c6,1,LEN(r1c6)-2),LEN(r1c6)
?r2c6=CHR(13)

oDoc.close()
oDocapp.quit()
2021-12-22 11:34
mywisdom88
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:190
帖 子:3125
专家分:8340
注 册:2015-3-25
得分:0 
2021-12-22 11:59
王咸美
Rank: 1
等 级:新手上路
帖 子:569
专家分:0
注 册:2018-1-4
得分:0 
非常感谢各位的指点!我想将多个word表格内容读入dbf表中,有的表12列都有数据,有的表只有左边6列有数据,如果第2行第7列的值为空就退出循环,不知代码如何写,盼高手指点,不胜感谢!!!
2021-12-22 13:51
王咸美
Rank: 1
等 级:新手上路
帖 子:569
专家分:0
注 册:2018-1-4
得分:0 
请高手赐教!

[此贴子已经被作者于2021-12-22 15:52编辑过]

2021-12-22 15:02
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:432
帖 子:10064
专家分:41463
注 册:2014-5-20
得分:0 
        txt = TRIM(tab.Cell(row,col).Range.Text, 0h0D,0h07,0h20)
        IF EMPTY(txt)
            ......
        ENDIF
2021-12-22 15:24
王咸美
Rank: 1
等 级:新手上路
帖 子:569
专家分:0
注 册:2018-1-4
得分:0 
谢谢!
2021-12-22 15:56
王咸美
Rank: 1
等 级:新手上路
帖 子:569
专家分:0
注 册:2018-1-4
得分:0 



[此贴子已经被作者于2021-12-22 16:54编辑过]

2021-12-22 16:46



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-507949-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.171180 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved