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 buenas tardes
Gusto en saludarlos a tod@s
Tengo la siguiente consulta a ver si me pueden ayudar, necesito una macro para generar archivo txt que me quede de la siguiente manera:
"06","0601017","477505,00000000","0,00"
"06","0601432","477505,00015784","0,50"
"06","0601662","477505,00000000","0,00"
"06","0601685","634499,73333333","0,00"
Al inicio me coloque las comillas " luego los separadores sea "," y al final cerrar con las comillas
Mi archivo de excel esta así
A B C D
06 0601017 477505,00000000 0,00
06 0601432 477505,00015784 0,50
06 0601662 477505,00000000 0,00
06 0601685 634499,73333333 0,00
Atento a los comentarios de quienes me puedan ayudar
Saludos