Excel. Crear una macro para dar formato a un rango que varía de un día a otro
Estoy intentando hacer una macro para que le dé formato a un listado de las facturas emitidas en el día.
Cada día habrá un nº distinto de facturas, o lo que es lo mismo, cada día habrá un número distinto de filas.
La idea es aplicarle un formato de los que se encuentran en el menú: “Inicio > Dar formato como tabla “.
El problema me surge cuando al día siguiente ejecuto la macro que aplica un “formato como tabla” y el rango que me coge es el mismo que cuando creé la macro.
Por ejemplo, si el día que creé la macro el rango que contenía las facturas era “A1:D50”, es decir tengo 50 líneas. Si al día siguiente el rango que quiero formatear es “A1:D40”, la macro sigue aplicando “A1:D50”.
Por favor ayuda. Me estoy volviendo loco con este tema.
1 Respuesta
Usa esta macro, se ajusta a las filas que existan.
Sub formatear_comotabla()
rango = Range("a1").CurrentRegion.Address
With ActiveSheet
.ListObjects.Add(xlSrcRange, Range(rango), , xlNo).Name = "Tabla_datos"
.ListObjects("Tabla_datos").TableStyle = "TableStyleLight12"
End With
End Sub
¡Muchas gracias! James Bond.
Me funciona perfectamente. No sabes la de horas que me he tirado haciendo pruebas y buscando información en la web. :)
