Dividir macro en exel debido a error de longitud

Preguntas y respuestas relacionadas

Insertar foto condicionada a un valor

Estoy intentando insertar una foto que dependa de la calificación en un cuestionario; he usado las macros de Dan que he visto publicadas pero no me jalan y no encuentro el error, ¿Me podrían apoyar? Sub insertarfoto() 'pone la imagen según un número...
1 respuesta

Cambiar celda para uso de autofiltro en visual basic

Tengo este código Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address(False, False) = "B2" Then Application.ScreenUpdating = False ActiveSheet.Unprotect "28021990" If ActiveSheet.FilterMode Then ShowAllData Application.EnableEvents...
1 respuesta

Modificar código para ocultar columnas en excel

Ya había hecho una pregunta en relación: ¿Cómo puedo ocultar COLUMNAS con macros en excel? Pero seguí buscando y encontré este código que es lo que necesito, pero quiero que haga lo contrario, en este código: Private Sub Worksheet_Change(ByVal Target...
1 respuesta

Limpiar Rango luego de Busqueda

A los integrantes de este foro, en ocasión recurro a su ayuda en como limpiar los rangos B4:G40, tras la búsqueda de un valor determinado que se posiciona en la celda A4, esta macro me fue brindada por Elsa Matilde. Private Sub Worksheet_Change(ByVal...
1 respuesta

Validación de Datos en Excel

Para todos. Estoy tratando de que la información de una celda en excel no sea nula o vacía. Utilizo la siguiente Macro: Private Sub Worksheet_Change(ByVal Target As Range) If IsEmpty(Range("$F$9")) Then MsgBox "Por favor rellene la casilla!",...
1 respuesta

Excel Macro borrar celda si contiene texto

Te quería preguntar como puedo hacer para borrar el valor de la celda si contiene cierto texto, el tema es que quiero poner entre 5 a 10 palabras que activen el borrado de las celdas. El Rango es una columna C:
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

Esta macro de mayúsculas me esta dando problemas

Esta macro de mayúsculas me esta dando problemas al eliminar celdas se me borran las celdas o líneas: Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Intersect(Target, Range("A12:D41, H12:H46")) Is Nothing Then...
2 respuestas

Macro lenta en la ejecución calculando celdas

Tengo esto en la hoja : Private Sub Worksheet_Activate() ActiveSheet.ScrollArea = "A1:Q6000" Call Celdas_oculta End Sub Private Sub Worksheet_Change(ByVal Target As Range) 'Por.Dante Amor If Target.Column = 4 Then If Cells(Target.Row, "B") = "" Then...
2 respuestas

Macro que busque fila donde se encuentre valor

Para Dante Amor. Quisiera un código que buscase valor range("a2") en dicha columna ("a:a") que contiene una relación nominal que empieza en "a5" y situe el cursor a la derecha de dicho valor buscado a partir de la celda que tenga libre (vacia). Para...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema