Saludos Profesor Sergio, de ante mano gracias por responder, realice lo que me sugirió coloque el código donde me indicó, sin embargo me sigue arrojando el mismo error.
' Restaurar formato de fuente
With wsHistorico.Rows("2:2").Font
.ColorIndex = xlAutomatic
.TintAndShade = 0
End With
' Incrementar automáticamente el número de recibo
wsRecibo.Range("J2").Value = wsRecibo.Range("J2").Value + 1
'Corrección de Error en impresión
Application.Wait (Now + TimeValue("0:00:01"))
' Imprimir
wsRecibo.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Por
dorgelis, · publicado
hola a todos;
el caso es que necesito rellenar un listbox con unas 80 columnas pero quiero irlo filtrando a medida que
voy introduciendo datos en los textbox;
el listbox lo relleno con rowsource,a pelo, pero no sé filtrarlo, ni si se puede;
lo relleno asi:
ListBox1.RowSource = "a2:cd2" & ActiveCell.Row
pensé en poner varios listbox, pero se me complica el asunto bastante...
Gracias de antemano.