Elsa Matilde

Esta macro resuelve tu consulta. Solo ajusta la variable ruta con el nombre de la carpeta donde deba guardarse. Por ahora lo hará en la misma del libro activo. Sub guardaLibro() 'x Elsamatilde 'cadena con los nombres de todas las hojas For Each sh In...

Este mensaje de error puede deberse a los siguientes motivos, entre otros: Error en el nombre de algún libroError en el nombre de alguna hojaError en el nombre de algún objeto, o referencia de celda El primer error está en la palabra es xlWhole en...

Tengo una consulta abierta con el tema: ¿Crear procedimiento para vaciar todos los textbox de cualquier formulario? Si el tema quedó comprendido y resuelto agradeceré valores la respuesta. Sino comenta (*) Con respecto a la consulta actual, si buscas...

A continuación así es cómo lo entendí. Si ninguna de las respuestas resuelve tu consulta debieras dejar alguna imagen o ejemplo de los resultados esperados. Si B está vacío >>> resultado = "". Sino, se promedia su valor (200) con la suma de 'no...

A continuación dejo las macros arregladas para las 3 hojas mencionadas. Van juntas en el módulo llamado Mod_hoja2_pista_pistadia. Sub buscar_reemplazar_borde2() 'arreglada x Elsamatilde 'Dbre'2021 Set sh1 = Sheets("Hoja1") Set rng2 =...

No hay un modo único para realizar ésto. Dependerá de lo que necesites borrar o conservar en cada hoja. Generalmente, si los libros deben empezar de 0 al inicio de cada año, les sugiero que guarden una copia vacía. Y esa será la que se comenzará a...

Si aún tengo tu libro de ejemplo ya revisaré tu macro, sino te lo solicitaré nuevamente.

Para los que no quieran enredarse con fórmulas matriciales, aquí les dejo otra opción: Seleccionar el rango de valores (en mi ejemplo col A) Desde menú DATOS, Texto en Columnas. El primer paso en la ventana del Asistente será seleccionar la opción...

En cualquier celda auxiliar coloca el valor -1 (en mi imagen la puse en S1) Selecciona la celda, y presiona CTRL C (o clic derecho opción COPIAR) Selecciona la columna con valores negativos (en mi imagen la col Q), clic derecho, Pegado Especial,...

En el Editor, seleccioná el objeto HOJA2 y allí copiá el siguiente código: Private Sub Worksheet_Change(ByVal Target As Range) 'se controla lo ingresado en B4 If Target.Address <> "$B$4" Then Exit Sub 'se borran datos de filtrado anterior On Error...