Deja rastro de selección al ejecutar Macro

Hola tengo este botón, lo que hace es desproteger el documento para luego desocultar las filas de 2 hojas, pero posterior a la ejecución quedan las hojas como seleccionadas (ya saben de color azulito trasparente cuando seleccionas con el mouse),

Private Sub CommandButton1_Click()
Sheets("PETS1").Select
ActiveSheet.Unprotect
Sheets("PETS2").Select
ActiveSheet.Unprotect
ActiveWindow.SmallScroll Down:=18
Sheets("PETS1").Select
Rows("28:51").Select
Selection.EntireRow.Hidden = False
Sheets("PETS2").Select
Rows("27:38").Select
Selection.EntireRow.Hidden = False
MsgBox "Alerta: Usted acaba de quitar la protección a la hoja de PETS, haga los cambios necesarios sin afectar el contenido válido del formulario ni alterar la configuración de impresión. "
End Sub

Que podría agregar para que no pase esto?

Saludos,

Milla

1 respuesta

Respuesta
1

Luego de cada acción, selecciona 1 celda cualquiera, quizás la de título sería lo + conveniente, aunque en el ejemplo dejé A1

Sheets("PETS1").Select
Rows("28:51").Select
Selection.EntireRow.Hidden = False

ActiveSheet.range("A1").Select

Y lo mismo para la 2da hoja

Gracias creo que es parecido a lo que hice... al final lo deje así:

Sheets("PETS Base").Select
Rows("27:38").Select
Selection.EntireRow.Hidden = False
Range("AH27").Select

Saludos,

Milla

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Ejecutar una macro dependiendo de otra macro?

Tengo una pequeña duda... Tengo dos botones con macros uno de ellos dice IMPRIMIR y otro dice REPARTO.. Lo que quiero es que no se pueda ejecutar el botón REPARTO si no se ha impreso nada osea si no le han dado clic al botón IMPRIMIR... En el botón...
2 respuestas

Macro para Ocultar Filas en Blanco

Tengo una hoja y en las filas J16:J61 trae datos de otra, en algunas ocasiones no se diligencian todos los campos, las fórmulas que tiene esa hoja hacen que si no hay datos para mostrar, se muestre vacía, pero quiero ocultar las filas que estén en...
1 respuesta

Conexión de datos ODC con Libro Excel Protegido.

Tengo un problema a la hora de actualizar un libro de excel que es una aplicación con macros y no puedo desproteger ni hoja ni libro de excel porque sino me podrían modificar el diseño de mi aplicación. Necesito que mi libro de excel se actualize con...
1 respuesta

Copiar celdas incluyendo el alto de la fila

Quiero copiar datos de una hoja a otra, estoy utilizando : Sub copiarpegar() Sheets("PETS Vivo").Range("B28") = Sheets("PETS Base").Range("B27") End Sub Pero que deo agregar para copiar el alto de la fila... Porque si la celda de la hoja PETS BASE...
1 respuesta

Ocultar o mostrar filas según valor de celda

Estoy haciendo una hoja de excel que funcionara de la siguiente forma, en las siguientes celdas capturare la cantidad de filas que quiero que se muestren o se oculten por ejemplo. En la fila 5 (B5) capturare el nombre del producto y en la celda (C5)...
1 respuesta

Macro para hoja protegida

Hace poco me hiciste una macro estupenda que eliminaba filas con celdas vacías en una columna, si se habilitaba una casilla determinada (concretamente si la celda k38="X"). La macro recalculaba para que si la K38 volviera a estar vacía se mostrasen...
2 respuestas

Como ocultar filas dependiendo de un valor.

Acudo a ti para consultarte lo siguiente: Tengo en una hoja "x" un listado con capacidad hasta 200 registros. En la hoja "y" tengo un formulario de 7 filas que se llena con la información de la hoja "x", lo que deseo es que si en la hoja "x" hay por...
1 respuesta

Macro con hoja oculta

Espero solucionar esto. Dos preguntas: 1- Por un lado tengo una macro ya hecha (la mcro es ir de hoja 1 a hoja 2 con un botón). Lo que quiero es que quiero ocultar la hoja 2, pero cuando la oculto la macro no funciona. Esta es la macro: Sub...
1 respuesta

Macro de autofiltros/oculte de columnas con celdas bloqueadas

Tengo una planilla con muchas macros que ejecutan autofiltros y oculte de columnas. Y necesito bloquear celdas luego de que se ingresen valores. El tema que cuando bloqueo las celdas tengo conflicto con la ejecución de las macros. Supongo porque...
1 respuesta