Macros en Excel

C贸mo Obtener el Nombre de Archivo en Excel, usando macros.

Raymundo Ycaza
#Macros (VBA)#馃 Automatizaci贸n con Excel

Cuando trabajamos con Excel y empezamos a manejar las macros, se nos vienen muchas ideas nuevas para mejorar nuestros archivos. Y esas nuevas ideas, muchas veces nos llevan a buscar nuevos conocimientos para poder realizarlas.

Un ejemplo de esto, puede verse cuando llega el momento en el que necesitas obtener el nombre del archivo en聽Excel, para colocarlo en una celda.

驴Te interesa descubrir c贸mo hacerlo?

隆Pues, empecemos!

驴C贸mo Obtener el Nombre de Archivo en Excel, usando macros?

(TRANSCRIPCI脫N DEL V脥DEO)

Lo primero que vamos a hacer, ser谩 acceder a la ventana del editor de c贸digo de visual basic, y vamos a insertar un nuevo m贸dulo.

Dentro de este m贸dulo, crearemos una funci贸n cuyo nombre ser谩 鈥淥btenerNombreLibro鈥. Esta funci贸n realizar谩 la tarea de 鈥渆scribir鈥 en la celda activa, el nombre que tenga el libro activo. Es decir, el libro que est谩 activo en el momento de ejecutarse la macro.

Si ejecutamos la macro, veremos que donde sea que est茅 la celda activa, se escribir谩 en ella el nombre del libro. En mi caso, el nombre del archivo es 鈥淥btener el Nombre del Archivo.xlsm鈥.

Pero 驴y qu茅 hago si necesito escribirlo en una celda espec铆fica? Por ejemplo, en mi caso, quiero escribirlo en la celda C4 de la Hoja2.

Para eso voy a escribir otra funci贸n y de esta manera me evito borrar la funci贸n anterior.

A esta nueva funci贸n le dar茅 el nombre 鈥渋nsertarNombreLibro鈥. En su interior, le dir茅 que escriba en la celda C4, pero de la Hoja2. Esto se consigue utilizando el objeto 鈥淩ange鈥, al cual le pasar茅 el nombre de la hoja, seguido de la referencia a la celda. No olvides separarlos por un signo de admiraci贸n, como estoy haciendo yo.

Entonces, una vez listo esto, cerramos el par茅ntesis y le decimos que el valor de este punto en la hoja, ser谩 igual al nombre del libro activo, que ya vimos c贸mo lo obtenemos.

Ahora, si probamos la funci贸n, veremos c贸mo no importa d贸nde nos ubiquemos, siempre se escribir谩 el nombre del libro, en la celda C4 de la hoja 2.

Pero, pongamos un 煤ltimo ejemplo. 驴Qu茅 tal si quiero hacerlo con un nombre de rango? Es decir, utilizar una celda con nombre, en lugar de escribir su referencia.

En mi caso, la celda C4 ya tiene un nombre de rango, el cual es 鈥渄efNombreArchivo鈥. Y lo que quiero es escribir en esa celda el nombre del archivo, utilizando el nombre definido. Para esto, crear茅 otra funci贸n, que llamar茅 鈥渕ostrarNombreLibro鈥. En esta funci贸n, la 煤nica diferencia que tendr谩 respecto de la anterior, es que ya no usaremos el objeto 鈥淩ange鈥, sino que directamente escribiremos, entre par茅ntesis angulares o corchetes, el nombre de la celda. En este caso, 鈥淸defNombreArchivo]鈥.

F铆jate que aqu铆 ya no usamos el atributo 鈥.value鈥, sino que directamente asignamos con el igual el nombre del libro, tal y como lo hemos venido haciendo en los casos anteriores.

Si probamos nuevamente el c贸digo, veremos que se comporta exactamente igual que si lo hubi茅ramos realizado con referencias, solo que al usar celdas con nombre, se facilita mucho la escritura y el mantenimiento a futuro de nuestros archivos.

Y eso es todo por hoy. Espero que con estos consejos puedas comenzar a crear tus archivos mejorados y te inspire a crear nuevas herramientas que potencien tu productividad con Excel.

隆Nos vemos!

[firma]

鈫 Regresar al Blog