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 estimados
Lo que necesito no se si se puede hacer pero voy pedir ayuda
Descargo de equipo una cadena de caracteres
ID5588555 (TRANSPORTES MANCOINER 100 KWH, 15 KVA, IIIUV, CAI)
Necesito que con esa cadena de datos buscar valores
Por ejmplo con la palabra MANCOINER, me busque su código
con la palabra IIIUV, me diga a cual subestación esta
Dejo el archivo para mejor compresión
Gracias de antemano
codigo plam.xlsx
Editado el por jumarcano
agregar archivo