Jump to content

Guardar Libro 1 (con macros) en libro 2 en un lugar específico (sin macros solo valores y formatos)


Recommended Posts

Posted

Amigos:

Tengo un libro de excel el cual cree una macro para imprimir y otra para guardar los datos en una carpeta especifica.

Actualmente al apretar guardar este lo realiza con el nombre que yo especifico de unas celdas y lo almacena en la carpeta especifica creando otro libro.

Ahora lo que necesito es que los datos solo se guarden valores y formatos sin macros. al momento de apretar el command_Button de guardar.

Las macros son:

Private Sub CommandButton1_Click()

Range("A1:H45").Select

ActiveSheet.PageSetup.PrintArea = "$A$1:$H$45"

Application.Dialogs(xlDialogPrint).Show

End Sub

Private Sub CommandButton2_Click()

Sub Convertir_a_valores()

Dim wshHoja As Excel.Worksheet

For Each wshHoja In ThisWorkbook.Worksheets

wshHoja.UsedRange.Value = wshHoja.UsedRange.Value

Next wshHoja

cadena = "\\Alpa\despacho\Despacho\BO\NC2013\" & Range("J16") & ".xls"

ActiveWorkbook.SaveAs cadena, FileFormat:= _

xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _

, CreateBackup:=False

End Sub

Espero alguien me ayude Please! :surprise:

Posted

Tendrías que copiar todos los valores a un archivo nuevo (una copia) y pegar en este los puros valores y mandarlo a que se guarde. Sube tu archivo de muestra para poder ayudarte mas

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...

Important Information

Privacy Policy