Luis Mondelo
 797K puntos  Vive en Castilla-La Mancha, España
@luismondelo desde - visto

Luis Mondelo

Excel avanzado y VBA

Preguntas y respuestas en Microsoft Excel

Mensaje al abrir excel que copia en una celda determinada

Hola, te paso la macro para conseguirlo: Sub auto_open() 'por luismondelo c = 1 Do While c = 1 fecha = InputBox("introduzca fecha por favor") ubica1 = Mid(fecha, 3, 1) ubica2 = Mid(fecha, 6, 1) If ubica1 <> "/" Or ubica2 <> "/" Then MsgBox "La fecha...

Distribuir filas en función de un nombre, a pestañas dentro de un mismo excel

Hola María, mándame el excel con los datos y un ejemplo de lo que necesitas, para poder ayudarte mejor luismondelo@gmail.com
Respuesta en Microsoft Excel a

Contar elementos repetidos de una columna y poner el número de recuento al lado

Hola Roobeld, creo que ya te he respondido en la otra pregunta. ¿lo tienes todo claro? un saludo
Respuesta en Microsoft Excel a

Sumar referencias columnas

Hola, tu solución pasa por una simple tabla dinámica. Para ese caso es la mejor opción y te permite un control absoluto de esos datos

Como hacer una macro que me copie solo las filas que contengan números que terminen en 1, 3 y 5, los pegue en otros libros?

Hola, te paso mi solución con esta macro. Estoy suponiendo que las filas de la hoja1 tienen datos desde la columna A Sub proceso() 'por luismondelo Sheets("hoja1").Select Range("c65000").End(xlUp).Offset(1, 0).Value = "end" Range("c1").Select Do...
Respuesta en Microsoft Excel a

Eliminar filas en rango seleccionado con celdas de valor igual a cero

Hola, te mando mi solución. Posiciónate en la primera celda de esa columna y después ejecuta esta macro: Sub proceso() 'por luismondelo Cells(65000, ActiveCell.Column).End(xlUp).Offset(1, 0).Value = "end" Do While ActiveCell.Value <> "end" If...
Respuesta en Microsoft Excel a

Macro de excel para extraer cada 250 lineas en hojas diferentes

Hola, para poder ayudarte mejor necesito aclaraciones: Desde que fila empiezan tus datos?? Cual es la primera columna de tus datos??? la A....

Copiar contenido de archivos de Texto a Excel.

Hola, prueba esta macro: IMPORTANTE: En la fila que empieza: ruta = ....... tienes que pegar el path del primer nivel de tus carpetas, es decir, la primera carpeta de todas. Sub proceso() 'por luismondelo Application.DisplayAlerts = False mio =...
Respuesta en Microsoft Excel y en 1 temas más a

Separar letras de una celda

Hola, te mando mi solución, supongo que los datos están desde E1 hacia abajo. Esta es la macro: Sub proceso() 'por luismondelo Range("e1").Select Do While ActiveCell.Value <> "" valor = ActiveCell.Value For x = 1 To Len(valor) + 1 extrae = Mid(valor,...
Respuesta en Microsoft Excel y en 2 temas más a

Capturar información de varias hojas en una nueva

Hola, te adjunto la macro para conseguirlo: sub proceso() 'por luismondelo for each hoja in sheets if ucase(hoja.name) <>"HOJA1" then hoja.select range("g5:r5").copy sheets("hoja1").range("a65000").end(xlup).offset(1,0).pastespecial paste:=xlvalues...

Temas