Crear macro para guardar hoja en otro libro

Hola Tavozp:
Tengo un libro de Excel con dos hojas. Una para realizar una serie de cálculos según datos que voy introduciendo y otra con los resultados. Mi duda es la siguiente:
Quiero crear una macro que copie la hoja de resultados a otro libro dándole el nombre al nuevo libro de una celda determinada. Esto ya lo he conseguido, sin embargo no se como decirle que me lo guarde en una determinada carpeta que yo le especifique, ya que siempre me lo guarda en "Mis documentos". Te envío la macro que he creado y dime donde tengo que corregir para conseguir lo que yo quiero.
Un saludo: Olakua
Sub GUARDAR()
Workbooks.Add
Windows("BST-PRESUPUESTOS.xls").Activate
Sheets("INICIO").Select
Range("A1").Select
GUARDA_Initialize
End Sub
Private Sub GUARDA_Initialize()
Load GUARDARST(User Form)
GUARDARST.Show
Windows("BST-PRESUPUESTOS.xls").Activate
PROYECTO = Sheets("Calculo").Range("E4").Value
Windows(2).Activate
ActiveWorkbook.SaveAs Filename:=PROYECTO
ActiveWorkbook.BreakLink Name:= _
"C:\BRIO_ST\BST-PRESUPUESTOS.xls", Type _
:=xlExcelLinks
Application.WindowState = xlMinimized
Windows("BST-PRESUPUESTOS.xls").Activate
End Sub

1 Respuesta

Respuesta
1
Remplaza la instrucción:
ActiveWorkbook.SaveAs Filename:=PROYECTO
por:
ActiveWorkbook.SaveAs Filename:="C:\Ruta\" & PROYECTO
Es decir, coloca la ruta completa cuando uses el SaveAs.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Como guardar solo una hoja del archivo de excel

Barsimpon también quería preguntarte si es posible crear una marco para guardar solo una de las hojas que contiene el archivo de excel es decir por ejemplo que solo me guarde la hoja 2 de todas las que se visualizan en el libro de excel. Esto es con...
1 respuesta

Guardar libro de excel con macro pero con el nombre de alguna celda de dentro del archivo de excel

Ya hice una macro en excel que me guarda un archivo automáticamente, pero me lo guarda con el mismo nombre, sobrescribiendo el mismo archivo, lo que quiero es que el nombre se cambien en automático cuando cambien una celda dentro del libro,, como...
2 respuestas

Datos excel a archivo txt sin espacios extras

Estimados necesito por favor que me ayuden con el siguiente problema, tengo un archivo Excel que me genera mediante una macro un archivo txt con tabulaciones, pero mi problema es que al lado derecho salen espacios lo cual no se requieren y requiero...
1 respuesta

Macro para guardar varias hojas y en pdf

Tengo esta macro pero solo me guarda la hoja1 del libro cuando quiero guardar tb la hoja2 y hoja3, es decir, el libro1 tiene 3 hojas y quiero guardar las 3, no solo una como me hace ahora, y ademas (no se si se puede) la hoja1 quiero guardarla en pdf...
2 respuestas

Mondelo modificación de macro para que me copie datos filtrado y los copie a un nuevo libro.

Acudo a usted luis mondelo por la gran ayuda y colaboración tan oportuna que me ha brindado. Gracias sos el mejor. Hace unos días buscaba copiar datos filtrados y pegarlos a otra hoja del mismo libro, es posible que con el código siguiente se haga...
1 respuesta

Ayuda con código vba para Copiar y Guardar Hojas

Tengo este código para seleccionar directorio para guardar 2 hojas a copiar: Dim Titulo, Directorio As String Sub SeleccionarDirectorio() Titulo = "Selecciona la ruta de tu carpeta" On Error Resume Next 'evitaría un error en caso de no seleccionar...
1 respuesta

Macro Guardar como *.txt

Estoy Tratando de Crear una Macro para guardar un archivo de excel a formato de texto (*.txt)pero cuando utilizo la macro en otro archivo, me guarda el anterior, donde se creo la macro. Quisiera utilizar esta macro en cualquier archivo
1 respuesta

Guardar copia de excel con macro

Es que quiero que al presionar un commandbuton se guarde una copia de excel en una ruta especifica, pero que solo guarde la copia ya que seguiremos trabajando en el archivo abierto que no va a estar en la ruta que quiero guardar
1 respuesta

Error al guardar libro compartido

Tengo una macro en un "pc1" que en un momento guarda un libro que a su vez lo consulta un segundo pc (pc2) de la red, funciona bien pero existen ocasiones en que la macro guarda el el libro en el pc 1 justo en el momento que el pc2 lo esta...
1 respuesta

Macro para guardar archivo de excel en txt

Que tal con ayuda de ustedes cree una macro de la siguiente forma: Private Sub CommandButton1_Click() nbre = Format(Now, "dd-mm-yy hh mm ss") ruta = ThisWorkbook.Path ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls" End Sub Pero al guardarlo es...
1 respuesta