Luis Mondelo

Luis Mondelo

Excel avanzado y VBA
 805K puntos  Castilla-La Mancha, España @luismondelo desde - visto

Actividad pública reciente

Ha empezado a seguir el tema
Ha cambiado su perfil.
  • Lema: Excel avanzado y VBA.
Ha cambiado su perfil.
  • Ha cambiado su experiencia.
Ha respondido en

Mensaje al abrir excel que copia en una celda determinada

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...
Ha respondido en

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

Mándame el excel con los datos y un ejemplo de lo que necesitas, para poder ayudarte mejor [email protected]
Ha respondido en

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

Creo que ya te he respondido en la otra pregunta. ¿Lo tienes todo claro?
Ha respondido en

Sumar referencias columnas

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
Ha respondido en

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?

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 While...
Ha respondido en

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

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...
Ha respondido en

Macro de excel para extraer cada 250 lineas en hojas diferentes

Para poder ayudarte mejor necesito aclaraciones: ¿Desde qué fila empiezan tus datos? ¿Cuál es la primera columna de tus datos? la A....
Ha respondido en

Copiar contenido de archivos de Texto a Excel.

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 =...
Ha respondido en y en 1 temas más

Separar letras de una celda

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, x, 1)...
Ha respondido en y en 2 temas más

Capturar información de varias hojas en una nueva

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 end if...
Ha respondido en

Macro para generar hipervínculos con parte del nombre.

Si ya tenemos ese código que es parte del nombre del fichero...¿cuál es la otra parte? ¿Cómo la conseguimos?
Ha respondido en y en 1 temas más

Pregunta para Luis Mondelo: Cambio estado y sumar

Inténtalo con la macro así: Sub proceso() 'por luismondelo fecha = Sheets("hoja2").Range("b1").Value Sheets("hoja1").Select Range("c2").Select Do While ActiveCell.Value <> "" If UCase(ActiveCell.Value) = "CARTERA" And ActiveCell.Offset(0, 3) <= fecha...

Experiencia

Muchas gracias a [email protected] por la experiencia y sabiduría que he adquirido prestando mi ayuda a este foro, pero la enfermedad de mi mujer me obliga a retirarme.

Un abrazo,

Trabajo

  • Profesor de Excel y macros
    Nivel experto , actualmente

Educación

  • Virgen de la Paloma
    Técnico especialista en informática de empresa