sub 隐藏多个工作表()sheets(array("sheet1","sheet2")).visible=0End subsub 取消工作表隐藏Dim ias integrfor i = 1 to 10 sheets.countsheets(i).visible=-1next iend sub