"guardar como" con el texto de una casilla

Hola, muy buenas, estoy empezando a hacer macros en excel, lo que he hecho hasta ahora es una macro que me guarda la hoja excel como otro libro en una rota específica, pero no consigo que seleccione el nombre para "sabe as" desde una casilla de la propia hoja. Es decir, que al guardar como, le asigne el nombre de un texto de celda excel.
Si supongo que quiero que me coja el texto que contiene la celda "A2" para que se guarde con es nombre el archivo, pongo "A2", el archivo se guarda como A2. O Rango ("A2").Capture, ... No sé muy bien.
He visto, el consejo de cómo guardar con la fecha y hora, usando el Path, pero no consigo hacerlo con el texto de la casilla A2.
Les agradecería mucho si me pueden ayudar.

1 Respuesta

Respuesta
1
El método SAVEAS te permite guardar un libro en la carpeta y con el nombre que quieras, solo tenés que armar una cadena para esto.
Ejemplo:
dim ruta, nombre
ruta = Sheets("Hoja1").Range("A2")
nombre = Sheets("Hoja1").Range("B2")
Activeworkbook.SaveAs filename:= ruta & nombre
Lo que tenés que tener en cuenta a la hora de armar la cadena es que el nombre de quede con una sintaxis similar a esta, respetando las barras y la extensión del archivo:
C:\Documents and Settings\All Users\DocumentosTuni\LibroX.xls
Es decir que si tu celda A2 tiene solo la carpeta sin la barra final o tu celda B2 tiene el nombre del libro sin la extensión tendrás que agregarlo así:
ruta = Sheets("Hoja1").Range("A2") & "\"
nombre = Sheets("Hoja1").Range("B2") & ".xls"
Espero que estos ejemplos te guíen para armar tu propia cadena.
Muchas gracias Elsamatilde, he conseguido hacerlo y eso que soy una principiante en esto. Muy útil tu aclaración. Gracias de nuevo. Saludos.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas