【已解决】谁会用excel的udf 帮个忙

cxlater · 发表于 2010-11-15 16:39:38

本帖最后由 cxlater 于 2010-11-30 21:44 编辑

这样的表格该怎么把第6行到最后一行的B列的数值给提出来或赋值给数组

nbmpe · 发表于 2010-11-15 17:06:14

_ExcelReadSheetToArray($oExcel, 1, 1, 5)
用这个命令,看下帮助

nbmpe · 发表于 2010-11-15 17:08:55

空行检测用这个,

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

这只是一段参考代码,改下就可以了.

cxlater · 发表于 2010-11-15 20:37:56

感谢结贴

haodd · 发表于 2010-11-15 21:26:49

结贴请改标题已解决

h20040606 · 发表于 2010-11-16 07:13:13

空行检测，可参考以下代码
Global CONST $xlUp = -4162

$iLastRow = $oExcel.ActiveSheet.Range.Cells(65536, 1).End($xlUp).Row

左手猫头鹰 · 发表于 2010-11-16 08:36:39

在帮助里面搜索 “_Excel”就能看到所有Excel的UDF了

dsital · 发表于 2010-11-16 09:35:09

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

[系统综合] 【已解决】谁会用excel的udf 帮个忙

本帖子中包含更多资源

相关帖子