VBA转forTABLE - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → VBA转forTABLE

共有1701人关注过本帖树形打印复制链接主题：VBA转forTABLE

zhuxinhui

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1839 积分：5103 威望：0 精华：0 注册：2017/11/8 17:37:00

VBA转forTABLE 发帖心情

Post By：2019/6/4 11:44:00 [只看该作者]

Dim I As Integer
Dim K As Integer
For I = 3 To Sheets("???").[B65536].End(xlUp).Row
Range("A" & I) = IIf(Range("A" & I) = "???????", Range("A" & I - 1), (IIf(Range("A" & I) = "???????", Range("A" & I - 1), (IIf(Range("A" & I) = "С??", "С??", (IIf(Range("A" & I) = "????????", Range("A" & I - 1), (IIf(Range("A" & I) = " ", " ", Range("A" & I))))))))))

这个VBA代码转化成FORTABLE操控电子表的代码被卡住了