Buenas noches
Tengo una pequeña duda sobre como seleccionar y cambiar el formato de fecha en las columnas K & L debido a que hay celdas vacias entre las celdas con informacion. La unica columna que tiene datos continuos es la columna N.

Archivo de Ejemplo

Gracias a todos de antemano.

    uf = Sheets("Sheet5").Range("A" & Rows.Count).End(xlUp).Row
    Sheets("Sheet5").Range("K2:L" & uf).NumberFormat = "dd/mm"

Prueba y comenta

Hace 3 horas, JSDJSD dijo:

   uf = Sheets("Sheet5").Range("A" & Rows.Count).End(xlUp).Row
    Sheets("Sheet5").Range("K2:L" & uf).NumberFormat = "dd/mm"

Funcionó excelente, muchas gracias por la ayuda.

Me alegro mucho pero la forma de agradecer a quien te ayuda o intenta ayudar es mediante el corazoncillo que hay en la parte inferior derecha, un saludo

Hace 26 minutos , JSDJSD dijo:

Me alegro mucho pero la forma de agradecer a quien te ayuda o intenta ayudar es mediante el corazoncillo que hay en la parte inferior derecha, un saludo

Listo, ahora que lo sé no lo olvidaré más, muchas gracias de nuevo por la ayuda.

Hola!

También puedes hacerlo es esta forma
 

Intersect(Range("K:L"), Range("N1").CurrentRegion).NumberFormat = "dd/mm"