UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1RESUELTO Macro exportar factura el 23/11/13, 02:32 pm

Invitado


Invitado
Buenas tardes, estoy usando esta macro para que cada cliente tenga un libro aparte, especifica y que grabe los datos pero sin las formulas, para tener todas las facturas por cliente y correlativas.

Sub AdraPaco()
Dim Ruta As String
Ruta = "G:\Factura\Almeria\AdraPaco.xls"
Worksheets("AdraPaco").Select
Range("B1:G36").Copy
Workbooks.Open Ruta
Worksheets("AdraPaco").Select
Range("A1").End(xlDown).Select
Selection.Offset(0, 1).Select
Selection.End(xlUp).Select
Selection.Offset(2, 0).Select
'Dirigirse a la ultima celda que contiene valores
'Pega valores
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Workbooks("AdraPaco.xls").Close savechanges:=True
End Sub


pero a veces me exporta el logo y otras no, y por mas vueltas que le doy no encuentro la solucion

2RESUELTO solucionado el 23/11/13, 05:07 pm

Invitado


Invitado
lo he podido solucionar.
Gracias de todos modos

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.