（已解决）如何判断excel中某个单元格是否为空

330259789 · 发表于 2010-10-17 18:06:14

本帖最后由 330259789 于 2010-11-21 00:43 编辑

我是通过循环语句从excel中取数据的，但是没有找到判断单元格是否是空的函数，这样的话循环就停不下来了大家帮忙想想办法吧~！谢啦

蜘蛛抱蛋 · 发表于 2010-10-17 18:31:05

_ExcelReadSheetToArray读取整张表，然后Ubound (array, $column)可不可以呢？我没试过。。。

330259789 · 发表于 2010-10-18 12:48:34

回复 2# 蜘蛛抱蛋

excel不是一打开就是满页的单元格？很多列的，那要多少维的数组啊，即使可以也不怎么可行。。。
不过还是谢谢你

蜘蛛抱蛋 · 发表于 2010-10-18 16:56:47

或者你可以在单元格结尾加上一个特殊的值，每读取一个值对比一下。。。

qq123123 · 发表于 2010-10-20 04:42:41

没错，就是要一个一个读出来，然后放到数组上，在对比，是否为空就行了，ACCS代码也能判断出！

nbmpe · 发表于 2010-11-11 19:12:33

我也是刚开始学EXCEL
; ***************************************************************
; 示例 1 打开一个新的工作表并返回其对象标识符, 然后使用一个循环写入单元格.
; 提示结束后插入一列，然后保存并关闭文件.
; *****************************************************************
#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ;创建一个新的工作表并打开

For $i = 1 To 5 ;循环
_ExcelWriteCell($oExcel, $i, $i, 1) ;在工作表单元格中纵向写入 1 至 5 信息
Next

_ExcelColumnInsert($oExcel, 1, 0) ;在指定的列插入(在第1列位置插入1列) ; 第二个位置，插入1列

For $i = 1 To 10 ;Loop
$sCellValue = _ExcelReadCell($oExcel, $i, 1)
If $sCellValue = '' Then
MsgBox(0, "", "为空的位置： " & @CRLF & 'A'&$i)
ExitLoop

EndIf
Next

MsgBox(0, "退出", "按[确定]保存文件并退出")
_ExcelBookSaveAs($oExcel, @DesktopDir & "\Temp.xls", "xls", 0, 1) ; 在临时目录保存文件, 如果文件已存在则覆盖原文件
_ExcelBookClose($oExcel) ; 关闭工作表, 退出

330259789 · 发表于 2010-11-21 00:43:36

谢啦，我用ini了。不写excle里面了

		自动登录	找回密码
密码			加入

[AU3基础] （已解决）如何判断excel中某个单元格是否为空

评分

相关帖子