Dante Amor

Dante Amor

https://www.youtube.com/@CursosDeExcelyMacros
 5.752K puntos  Ciudad de México, México @aprendemos desde - visto
Preguntar

Respuestas en Visual Basic

Respuesta en y en 2 temas más a

Macro para copiar debajo de última fila de otra hoja con condicionales

Prueba la siguiente: Sub CopiarDatos() Dim sh1 As Worksheet, sh2 As Worksheet, lr As Long ' Set sh1 = Sheets("Hoja1") Set sh2 = Sheets("Hoja2") Select Case sh2.Range("A5").Value Case 0 MsgBox "no se realiza ninguna copia: Valor 0" Exit Sub Case "ARS"...
Respuesta en y en 2 temas más a

Macro para que se cumpla una condición copiando y pegando columna por columna a una columna específica.

Bienvenido a TodoExpertos. ¿Cuál es la condición? Podrías poner una imagen con un ejemplo de tus datos, sin son datos confidenciales puedes remplazar con datos genéricos. De acuerdo a la imagen que pongas, explica cuáles columnas deberás ser copiadas...
Respuesta en y en 2 temas más a

Dividir con SUMAPRODUCTO ignorando celdas en blanco

Prueba así: =SUMAPRODUCTO((C14:C1000="m")*(I14:I1000>0)*(S14:S1000/(1+Q14:Q1000)))
Respuesta en y en 1 temas más a

Excel exportar a pdf a partir de lista desplegable

Puedes explicarlo con imágenes. Inserta aquí imágenes de tus hojas, describe paso a paso lo que haces manualmente, pon una imagen para cada paso.
Respuesta en y en 2 temas más a

¿Cómo insertar filas en blanco cuando dentro de la data hay fechas faltantes? Cómo insertar la fecha en la celda correspondiente

Un proceso para insertar filas, utilizando la función de excel para insertar filas, con 9,000 registros sería muy lento. Te recomiendo pasar todos los datos a memoria, insertar las filas en memoria y descargar la memoria en otras columnas. Solamente...
Respuesta en y en 1 temas más a

Como hacer una barra de progreso incluida en un formulario que me diga en que por ciento...

Puedes poner aquí tu código completo de ese "procedimiento de borrar", para ver si puedo mejorar el código y sea más rápido.
Respuesta en y en 2 temas más a

Evitar error en la función range find si no encuentra ningún valor

Podrías explicar tu proceso. ¿En cuál hoja comienza tu proceso? Sheets("CREDITOS").Select ActiveSheet.Range("B:B").Find(FILACITA).Select If ActiveCell.Offset(0, 7) = 0 Then ActiveCell.Offset(0, 6) = Sheets("CIERRE").Range("G4")...
Respuesta en y en 2 temas más a

Excel visual basic macro error en condición en IF

Prueba lo siguiente para validar "*Almacén*", en minúsculas o en mayúsculas, con acento o sin acento: If Range("A" & i).Value = "Referencia 23" And _ (Not LCase(Range("D" & i).Value) Like LCase("*almacén*") Or _ Not LCase(Range("D" & i).Value) Like...
Respuesta en y en 2 temas más a

Problema de compatibilidad de excel 2019 con 2013

Me parece que las funciones contar. Si. Conjunto y sumar. Si. Conjunto están disponibles desde excel 2007. Puedes poner aquí tu fórmula, qué error te aparece. Puedes reinstalar excel en tu equipo donde tienes excel 2013. ¿Exactamente qué versión de...
Respuesta en y en 2 temas más a

Tengo una macro que convierte un de Excel a TXT, quisiera gregarle operaciones como multiplicación y redondear el resultado.

Puedes poner aquí tu macro. Utiliza el icono para poner código. Qué celdas y qué operaciones quieres hacer. Pon ejemplos.