本示例隐藏当前工作表的第3列。

Activesheet.Columns(3).Hidden = True