Quiero una macro que cuando se abra oculte ciertas hojas y cuando se cierre también oculte, ejemplo hoja 1, hoja 2.visible.false

Ejemplo

Private Sub Worksheet_Activate()
Sheets("Ajuste por Inflacion").Visible = False
Sheets("Ingresos y Egresos").Visible = False
Sheets("Ingr y Egr Otras Categorias").Visible = False
Sheets("Capital Afectado a la Actividad").Visible = False
Sheets("Bienes de Uso y Amortizaciones").Visible = False
Sheets("Bienes y Deudas").Visible = False
Sheets("Determinacion del Resultado").Visible = False
Sheets("Retenciones").Visible = False
Sheets("Bienes Personales").Visible = False
Sheets("Inicio").Select
Range("E12").Select
End Sub