Guardar Libro 1 (con macros) en libro 2 en un lugar específico (sin macros solo valores y formatos)
publicado
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.
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: