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 Buen Dia Gente, Es mi primer post en el Foro
Quero Dar las gracias por este gran aporte que brindan!
Despues Paso a lo Siguiente.,
Tengo un simpre formulario el cual contiene un boton me crea una Base Datos en SQL
otro que crea la Tabla y Poateriormente Introducir los Datos , Los Datos me los Agrega
perfectamente al Excel, Pero lo que quiero es que tambien los Pegue en la Tabla de la Base de Datos SQL.
Si alguien me puede suguerir Algo
Estoy Disponible
Graciass!
Base de Datos.rar