以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]表内空白单元格填充  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183664)
--  作者：lgj716330
--  发布时间：2022/11/11 18:31:00
--  [求助]表内空白单元格填充
如图，想实现如果单元格是空的，就找同一列上一行单元格，如果上一单元格不为空，就填充上一单元格的内容，有什么快速的办法没有

图片点击可在新窗口打开查看此主题相关图片如下：微信图片_20221111182608.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2022/11/12 8:59:00
--  
dim r as row
for i as integer = 0 to tables("a").rows.count - 2
for each c as col in tables("a").cols
r = tables("a").rows(i+1)
if r.isnull(c.name) then
r(c.name) = tables("a").rows(i)(c.name)
end if
next
next