主题：下拉窗口 用在所有的包含某列的表

参考

For Each t As Table In Tables
    If t.cols.Contains("团队") Then
        t.Cols("团队").DropForm  = "团队输入"
    End If
Next