Foro Excel

Buenos Dias a todos!

Lo que deseo es basicamente eso.

Que si en la Celda B3 pongo: D190025 se guarde en un archivo de excel con ese mismo nombre.

Aclaraciones:

El nombre de la celda puede incluir numeros o letras, segun sea el registro.
Se utilizara en versiones de office antiguas y la mas actual 2010.
- - - - - -

Gracias!

Hola

Te envío una posible solución.

Espero que te sirva

Un saludo

Alberto

Ah olvidaba decirte un par de cosas

La opción que te he pasado, crea un archivo cuyo nombre será el valor que hayas puesto en B3.

El archivo lo crea en el mismo directorio/carpeta donde esté el archivo original desde el que se ha creado

El archivo creado contendrá solo la hoja activa, en este caso es la 1, pero puedes cambiarlo en la propia macro, también puedes cambiar la celda que contendrá el nombre. También puedes lanzar la macro desde otra hoja y grabar la hoja que te intesese.

Procura no incluir en el nombre barras inclinadas / o simbolos raros que te puedan dar errores en el momento de la grabación.

Un saludo

Hola muchisimas Gracias!

Pero ahora me surge la duda de como lanzar la macro que muy amablemente me proporcionaste en otra hoja de excel?

Gracias!

Hola de nuevo

Te reenvio la hoja con la imagen que lanza la macro situada en la hoja 2 (la puedes cortar y pegar en la hoja que quieras).

Si abres la macro verás que el único cambio es añadir esta línea Sheets(1).Select
para enviarle a la hoja 1 (o a la que tu quieras, siempre que en ella esté en B3 el nombre que quieres dar al archivo) y que sea esa la hoja que quieres que se grabe en el archivo

Un saludo

Alberto

Hola

Acabo de releer tu pregunta y dudo de si lo que quieres es lo que te he enviado o poder utilizar la macro en un archivo tuyo. En caso de que sea esto último lo que querías, solo tienes que acceder al editor de Visual Basic, (Tecla Alt + F11) copia el contenido de la macro que está en el módulo1. Cierra la hoja, abre la tuya (en la que quieres poner la macro) accede al editor de VB como antes, ponte sobre la línea (arriba izquierda, en el explorador de proyectos) que empieza VBAProject y entre parentesis pondrá el nombre de tu archivo, pues con el cursor sobre esa línea pulsa el botón derecho, elige la opción Insertar, elige Módulo, si no tienes ninguno se creará el Módulo1, y a la derecha en la ventana gran de blanco (pone General) pega el contenido de la macro del archivo mio, comprueba los nombres de las hojas de la macro respecto a las tuyas (cambia en la macro lo que esté mal) y listo.
Espero que te sirva te adjunto una captura de pantalla como ayuda

Alberto

Otra opcion posible, seria que al guardar te saliera una ventana para que pusieras un nombre
y si dicho nombre esta repetido te avise.
Te mando la otra opcion.

Hola a todos!

Me surge una duda de vuestros ejemplos y es la siguiente:

Es posible que al guardar la copia de la hoja, esta se guarde automáticamente a una carpeta ejm: "\DATA" (sin que esta carpeta exista previamente) dentro de la misma carpeta donde el archivo se encuentre?

Es decir q siempre grabe las copias en la ubiacion que se encuentra el archivo original pero creando una sub-carpeta que contenga unicamente las copias.

Gracias

Hola Celina

En caso de que la subcarpeta para las copias no exista, la macro daría un error. Lo mas sencillo para hacer lo que quieres es crear esa subcarpeta donde vas a guardar las hojas y modificar la macro.

Por ejemplo:

El archivo principal lo tienes en una carpeta que se llama Principal
Dentro de Principal creas una subcarpeta que se llamará COPIAS (O el nombre que tu quieras). Abre el archivo principal, entra al editor de Visual Basic y modifica la macro:
.SaveAs Filename:=ThisWorkbook.Path & "\COPIAS\" & nbre & ".xls", _
Es decir, añade COPIAS\ a la ruta existente, graba y listo.

Al ejecutar la macro te grabará la hoja1, con el nombre que hayas puesto en B3, en la carpeta COPIAS que está dentro de la carpeta llamada Principal. Y cada vez que grabes con otro nombre te lo volverá a grabar en la carpeta COPIAS.

Espero que te sirva

Un saludo

Alberto

Gracias Alberto

Si habia visto que la opcion de crear manualmente una carpeta de destino era posible, pero precisamente lo que deseo saber es si a travez de excel se puede crear dicha carpeta automaticamente pues el archivo podria ser utilizado en diferentes ordenadores con sus archivos independientes.

Hola Albertompa, muchas Gracias por tu ayuda, la segunda explicacion que me diste me funciono.

Ahora mismo la estoy usando y funciona a la perfección.

Muchas Gracias por tu tiempo y ayuda.

Saludos Cordiales

Hola, disculpa ahora me surgio otra inquietud:

Se pudiera lo mismo que me hiciste favor, pero guardando todo el libro??

Si tiene 3 Hojas que me guarde esas 3...si tiene 5 que me guarde las 5...etc, etc??

Gracias!

Hola Mxsmelkor,

Prueba este archivo.

En la macro anterior encontrabas en la formula la aplicacion "ActiveSheet", pues bien esa es la que determina que la accion se aplique solo a la "Hoja Activa".

Por eso en este encontraras "ActiveWorkbook" que se refiere a todo el "libro Activo".

Espero te sirva!

PD: Tambien soy nuevo en el tema pero mientras tanto puede q solucione tu inquietud.

Holaa, Muchas Gracias por tu ayuda.

Soy nuevo en macros.

Nuevamente Gracia

Hola Chicos!

podrian por favor dar una ojeada a esta nueva pregunta:

macros/urgente-error-t17098.html

Gracias de ante mano! es bastante urgente!