你要隐藏哪个工作就写哪个工作表如Sub aa() Sheets("sheet1").Visible = 0End Sub这是隐藏sheet1这个工作表的,=2时尝试深度隐藏,=-1时显示工作表,=0时一般隐藏,可在工作表点右键取消隐藏,深度隐藏时,在工作表中不能取消隐藏。