Macro actúa en pantalla normal y no en pantalla completa

Preguntas y respuestas relacionadas

Celda que identifique un texto en especifico y salga un imputbox

Tengo este código: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(False, False) = "B2" Then Application.EnableEvents = False Range("B2").Select Target.Value = "*" & Target.Value & "*" Range("B2").Select Application.EnableEvents...
1 respuesta

Macro para ordenar un rango variable

Tengo esto dela grabadora Sub Macro10() ' ' Macro10 Macro ' ' Acceso directo: Ctrl+Mayus+L ' Rows("9").Select Range(Selection, Selection.End(xlDown)).Select ActiveWorkbook.Worksheets(ActiveSheet.Name).Sort.SortFields.Clear...
1 respuesta

Macro para acceso a determinadas hojas

Tengo unlibro en el cual se controla adecuadamente el acceso al mismo dependendo si el usuario esta inscrito en el mismo y además si esta habilitado. Ademas queda el registro histórico de los ingresos con fecha y hora, pero necesito encontrar la...
1 respuesta

Eliminar autoshapes sin eliminar validación

Tengo el siguiente código: Dim autoforma As Shape For Each autoforma In ActiveSheet.Shapes autoforma.Delete Next autoforma Range("A1").Select Pero resulta que en donde tengo que borrar las formas, tengo celdas en donde hay validación de datos y...
1 respuesta

Este codigo me corre algunas veces y despues me da Error, alguien puede darme una mano?

Error en el metodo insert de la clase Range Sub CheckIn_Guardar() Application.ScreenUpdating = False Sheets("Datos").Select Rows("3:3").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow Sheets("Check_In").Select...
1 respuesta

Mejora en impresión por medio de macro

Tengo este macro Private Sub imprimir() Application.ScreenUpdating = False Sheets("IMPRESION").Select Range("A:G" & j).Select Selection.PrintOut Copies:=1 Sheets("JUGADOS").Select Application.ScreenUpdating = True End Sub pero quiero que cuando...
1 respuesta

Macro para ejecutar según contenido de celda lista despliegue

Tengo las siguientes rutinas que lo que buscan es ejecutar una macro dependiendo del valor de una celda: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address <> "$M$7" Then Exit Sub ActiveSheet.Unprotect Password:="XXXX" Select Case...
1 respuesta

Llenar campos obligatorios para ejecutar una macro...

Tengo esta macro en la cual me guarda la información de algunas celdas que se llenan, pero quisiera que no me permita ejecutar la macro si alguna de esas celdas no están llenas. Sub CREA_NUEVO_CLIENTE() ' ' CREA_NUEVO_CLIENTE Macro ' AGREGA NUEVO...
1 respuesta

Macro para desbloquear hoja no funciona

He grabado una macro en la que desbloquea una hoja protegida con contraseña, selecciona la fila de los títulos y le pone un filtro. Le he asignado un botón. La macro funciona bien, el problema es que si le doy una vez al botón hace la función para la...
3 respuestas

Necesito ayuda sobre un mensaje de error en Excel

Intentaré expresarme lo mejor posible para hacer más entendible el error. Bien, tengo una tabla denominada "teléfonos" con los campos "extensión y modelo" de la cual tengo realizada una consulta con los criterios "Como [Escribe el numero de...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema