Borrar contenido (en celdas especificas) al salir del libro
Necesito un help.
El código es este:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Range( _ "AR5:AW5,AC8:AW12,AE15:AW16,I15:Y16,AE25:AM25,AA29:AW33,E29:Y33,F35:AW38,G8:L8,V10:Z10" _ ).Select Range("V10").Activate Selection.ClearContents Range("W5:AB5").Select 'Proteger ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True ThisWorkbook.Save End Sub
El problema es que tengo 6 hojas distintas y al salir por otra hoja, se borra el contenido de la que estaba por ultimo, necesito limitar el código a la hoja1. Así puedo salir de cualquiera sin coger riesgo de borrar otros contenidos.
3 Respuestas
Respuesta de Dante Amor
5
Respuesta de Elsa Matilde
4
Respuesta de James Bond
1