主题：如何动态取消列的按钮

If e.IsFocusCell Then
    If e.Col.Name = "成本名称" Then
        If e.Row("材料") = True Then
            e.Col.Combolist = "..." 

        Else

            e.col.Combolist = "嘻嘻嘻"

            e.col.Combolist = ""
        End If
    End If
End If