Luis Mondelo

Te mando mi solución con esta macro: Sub proceso() 'por luismondelo Sheets("hoja1").Select valor = Range("c12").Value Set busca = Sheets("hoja2").Range("a1:a" & Sheets("hoja2").Range("a65000").End(xlUp).Row).Find(valor, LookIn:=xlValues,...

Si quieres quedarte solo con el año de la fecha lo puedes hacer con esta fórmula: Ej: Tenemos la fecha en la celda A1 En la celda B1 anota esta fórmula: =año(a1) Recuerda finalizar

En el siguiente enlace te dejo un archivo con un ejemplo programado para que lo veas http://share.cx.com/tQmdLv No olvides finalizar la consulta

Te mando mi solución con esta fórmula. TEnemos anotado en dato en la celda B3 =SI(Y(ESERROR(IZQUIERDA(B3;1)/1);ESERROR(DERECHA(B3;1)/1));"NIE";SI(ESERROR(DERECHA(B3;1)/1);"DNI";"PASAPORTE")) recuerda finalizar

En el siguiente enlace te dejo un ejemplo que he programado y que queda bastante elegante http://share.cx.com/DQhCrX No olvides finalizar la consulta

Te mando un ejemplo de un listbox de una sola columna y pasamos todo su contenido a la columna A a continuación de la última fila disponible Private Sub CommandButton1_Click() For x = 0 To ListBox1.ListCount - 1 Range("a65000").End(xlUp).Offset(1,...

Para poder sumar esas celdas, teniendo en cuenta que hay alguna con error, debemos hacerlo mediante una fórmula como esta: (en este ejemplo estoy sumando el rango B2:E2) ¡ Atención ! Es una fórmula matricial, para poder aceptarla hay que pulsar...

Ok, mándame el archivo con los datos y un ejemplo explicado para poder ayudarte mejor [email protected]

En el siguiente enlace te dejo la solución http://share.cx.com/qFYtVZ No olvides finalizar la consulta

Para poder filtrar un intervalo de fechas mediante VBA necesitas reconvertir las fechas al formato: mm/dd/yyyy Por ejemplo, una vez tengamos la variable de Ifecha1 y Ifecha2 haríamos lo siguiente: Ifecha1 = format(Ifecha1,"mm/dd/yyyy") Ifecha2 =...