Visual Basic - Guardar RANGO de celdas en libro nuevo

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 1
Ha aumentado su posición en 5 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Guardar RANGO de celdas en libro nuevo

Publicado por Juan (1 intervención) el 12/06/2019 17:30:55
Buen día estimados

Agradecería mucho me puedan ayudar, ya que estoy partiendo recién aprendiendo a comprender este lenguaje.
Logré adaptar un código a mis necesidades y lo ocupo bastante en mis labores diarias.
Trabajo una hoja en excel y con un código la guardo en una ruta asignada en una celda de la hoja y con el nombre compuesto de 2 celdas nombre y periodo mes año. Lo que quisiera hacer es exactamente lo mismo pero que guarde un rango de la hoja (A2:AA90), la guarde con las mismas celdas de condición con la diferencia que lo haga en xlsx, por lo tanto sea sin macros ni formulas, solo valores. He intentado hacer algunas ya que necesito 2 botones, una para pdf y otra para excel y al ocupar Sub Guardar() por segunda vez arroja "Se ha detectado un nombre ambiguo"(por tratar de repetir la primera cambiando formatos).

Espero que alguien pueda ayudarme, de antemano gracias


Sub Guardar()
On Error GoTo aviso
Dim xcel As String
Dim zfilename As String
Dim outName As String, i As Long

Dim archivo As String
Dim ano As String


archivo = Range("E14")
ano = Range("E13")

outName = archivo

zfilename = Range("F14") & "\" & outName & "" & ano

ActiveSheet.ExportAsFixedFormat xlTypePDF, zfilename
Exit Sub
aviso:
MsgBox "Error: " & Err.Description & " " & Err.Number

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder