Foxtable(狐表)用户栏目专家坐堂 → 自动填充的问题


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

主题:自动填充的问题

帅哥哟,离线,有人找我吗?
寒萧
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:194 积分:2184 威望:0 精华:0 注册:2010/5/22 10:13:00
自动填充的问题  发帖心情 Post By:2012/11/11 19:55:00 [只看该作者]

导入的excel表,有合并的单元格,如何导入后自动填充向下的空值,求自动填充的代码.

 回到顶部
帅哥哟,离线,有人找我吗?
czy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33957 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2012/11/11 22:16:00 [只看该作者]

Dim t As Table = CurrentTable
For Each r As Row In t.Rows
    If r.IsNull("第一列")
        r("第一列") = t.Rows(r.Index -1)("第一列")
    End If
Next

 回到顶部
帅哥哟,离线,有人找我吗?
nblwar
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:977 积分:6806 威望:0 精华:1 注册:2012/8/7 22:03:00
  发帖心情 Post By:2012/11/12 11:36:00 [只看该作者]

直接在EXCEL里面用CTRL+G定位填充不就完啦,还写那么多代码干嘛

 回到顶部
帅哥哟,离线,有人找我吗?
寒萧
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:194 积分:2184 威望:0 精华:0 注册:2010/5/22 10:13:00
  发帖心情 Post By:2012/11/15 8:58:00 [只看该作者]

非常感谢

 回到顶部
帅哥哟,离线,有人找我吗?
寒萧
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:194 积分:2184 威望:0 精华:0 注册:2010/5/22 10:13:00
  发帖心情 Post By:2012/11/15 8:59:00 [只看该作者]

表格很大,而且要填充的不止一列,所以还是代码方便

 回到顶部