Foxtable(狐表)用户栏目专家坐堂 → 导入excel时,如何防止空内容导入


  共有1788人关注过本帖树形打印复制链接

主题:导入excel时,如何防止空内容导入

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/6/8 20:18:00 [显示全部帖子]

    For n As Integer = 1 To Sheet.Rows.Count - 1
if Sheet(n, 0).text > "" then
        Dim r As Row = Tables("合同台账.签约价格").AddNew()
        For m As Integer = 0 To nms.Length - 1
            MessageBox.Show(Sheet(n, m).Value)
            r(nms(m)) = Sheet(n, m).Value
        Next
end if
    Next

 回到顶部