本示例隐藏当前工作表的第3列。
Activesheet.Columns(3).Hidden = True