主题：清空当前行指定单元格 公式能简化一下吗? 【ok了！】

With currenttable
     for each c as col in .cols
           .current(c.name) = ""
     Next
end with
      

Dim T,cs() As string
T = "A,B,C,D,E,F,G,H,I,AA,DD,EE,EWWQ,RRF,"
T = T & "KK,WW,DDE,QQQ,XX,LL"
cs = T.split(",")

With currenttable
     for each T in cs
         .current(T) = ""
     Next
end with