主题：[求助 s elect语句求助

 循环，隐藏掉

for each c as col in tables("表A").cols
    If c.Table.DataTable.Find(c.name & " is not null") is nothing Then
        c.visible = False
    else
        c.visible = true
    End If
Next