como guardar macro en libro de macros personales (editada en visual)

[Jose Soler]

Hola a todos/as:

"Si desea que la macro esté disponible siempre que se utilice Excel,
almacene la macro en el libro de macros personales en la carpeta de inicio
de Excel"

.... pero ¿cómo se hace si no la grabaste?,
¿Cómo se hace si la macro la has escrito en el editor de visual?

Salu2,

--
Jose Soler
Salu2 desde Madrid

[Ana Cuesta [MS]]

Hola,

Lo que tienes que hacer es crearte un libro llamado PERSONAL.XLS y
guardralo en el directorio iniciar y copiar y pegar ahí todas tus macros,
luego guardar el archivo y ocultarlo, para que cuando inicies Excel se
cargue pero no lo veas y así a partir de haora siempre que crees una macro
como el libro está disponible ya la puedes hacer directamente en ese libro.

Espero que te sirva de ayuda

--
Un saludo

Ana Cuesta
Microsoft España

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no
otorga ningún derecho.
"Jose Soler" <joseso...@NOSPAMhotmail.com> wrote in message
news:ux4C71$HDHA...@TK2MSFTNGP10.phx.gbl...

[Servando]

Jose:

Para crear el libro "Personal.xls", grabas una macro que haga
cualquier tarea...
1. "Herramientas" |"Macro" | "Grabar nueva macro..."
2. Lo primero que pide es como vas a nombrar la macro y si la va a
guardar en este libro... le indicas que la guarde en Libro de macros
Personal. Aceptas.
2. Detienes la grabacion.

A partir de este momento, Excel a creado el libro Personal.xls para
esa instalacion (Oculto).

En lo sucesivo, cada vez que necesites una macro que requieras este
disponible en cualquier momento en el que este abierto Excel, la
grabas en este libro.

Saludos
Servando Villalon

"Jose Soler" <joseso...@NOSPAMhotmail.com> wrote in message news:<ux4C71$HDHA...@TK2MSFTNGP10.phx.gbl>...

[Jose Soler]

Hola Ana y Servando, gracias por contestar.

No habia nada en mi carpeta INICIAR, después del post de Ana guarde en ese
directorio un libro llamado personal.xls, y le puse la propiedad Oculto.

Cuando abro un nuevo libro d excel, en su menu Macros no puedo ver las
macros que grabe y/ o escribi en el libro oculto personal.xls, el menu
macros aparece vacio, aunque selccione Macros en: Todos los libros abiertos.

Si quiero asignar a un nuevo boton una macro con personalizar/asignar macro,
tengo que darle una ruta absoluta y cuando hago click en ese botón me abre
el libro personal y después ejecuta la macro allí.

No consigo que las macros esten disponibles en un nuevo libro. ¿que hago
mal?

Salu2

J

"Servando" <servando...@desc.com.mx> escribió en el mensaje
news:3296c412.03052...@posting.google.com...

[Jose Soler]

Hola Ana y Servando, gracias por contestar.

No habia nada en mi carpeta INICIAR, después del post de Ana guarde en ese

directorio un libro llamado personal.xls, con macros en un modulo, y le puse
la propiedad Oculto.

Cuando abro un nuevo libro d excel, en su menu Macros no puedo ver las
macros que grabe y/ o escribi en el libro oculto personal.xls, el menu
macros aparece vacio, aunque selccione Macros en: Todos los libros abiertos.

Si quiero asignar a un nuevo boton una macro con personalizar/asignar macro,

tengo que darle una ruta absoluta y cuando hago click en ese botón en lugar
de ejecutarse la macro me abre el libro personal, como si fuera un
hyperenlace y después ejecuta la macro en el libro personal.xls pero no en
el nuevo.

No consigo que las macros esten disponibles o visibles para asignarlas en un

nuevo libro. ¿que hago
mal?

Salu2

J

"Servando" <servando...@desc.com.mx> escribió en el mensaje
news:3296c412.03052...@posting.google.com...

[Jose Soler]

No me habia dado cuenta aun pero ahora después de colocar este archivo en la
carpeta Iniciar, cuando incio excel en lugar de abrir un nuevo libro en
blanco y el personal oculto, me abre directamente solo el libro
personal.xls.

¿Esto no es lo queriamos no?, ¿o si?.

Salu2,

J

"Jose Soler" <joseso...@NOSPAMhotmail.com> escribió en el mensaje
news:#vuL$iMIDH...@TK2MSFTNGP11.phx.gbl...

[Servando]

En efecto, eso es un error... por eso te sugerí que permitieras que
Excel creara el "Personal.xls" por ti, si grababas cualquier macro
diciendole que la querias guardar en "Personal.xls".

Para corregir el error, te sugiero que quites de la carpeta Inicio el
archivo en cuestion, luego, si no lo has hecho ya, lo creas mediante
el procedimiento que antes te dije.

Una vez creado, ya puedes crear nuevas macros o copiar otras
utilizando directamente el Editor de Visual dentro de Excel, tal y
como lo haces con las que grabas en los libros de trabajo normal.

Saludos
Servando Villalon

"Jose Soler" <joseso...@NOSPAMhotmail.com> wrote in message news:<udQs2sMI...@TK2MSFTNGP11.phx.gbl>...

[Jose Soler]

Muchas gracias Servando, ya quite ese libro de la carpeta Iniciar, y cree la
macro desde un nuevo libro para salvarla en el libro de macros personales
que se crea oculto. Ahora se abre solo un nuevo libro en blanco y si abro el
cuadro macros veo que puedo asignar las macros que están en el libro de
macros personal, por ejemplo a botones, ...pero cuando creo un procedimiento
en la hoja1 del libro en blanco y llamo a una macro que está en el módulo
del libro personal me dice: "error de compilación no se ha definido Sub o
Function". No encuentra la macro.

El procedimiento que pego es este: (llama a la macro borrar que esta en
personal.xls)

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Range("A5") = 79 Then
borrar 'Nombre de la macro
End If
End Sub

A ver si me podeis orientar un poquillo, supongo que sera un problema de
alcance y visiblidad pero no me doy cuenta de como arreglarlo.

Gracias y saludos,

Jose

"Servando" <servando...@desc.com.mx> escribió en el mensaje
news:3296c412.03052...@posting.google.com...

[Servando]

Jose:
Ahora en lugar de llamar solo por el nombre de la Macro, también
tienes que indicarle de donde la va a extraer.

Ejemplo:
Application.Run("Personal.XLS!borrar")

y si al invocar a una macro esta requiere de parametros, entonces los
declaras después de llamarla.
Ejemplos:

Sub Llama()
Dim MiCant As Long
Valor = ActiveCell
MiCant = Application.Run("Personal.XLS!NUMTEXT_P", Valor)
MsgBox "Macro resultado: " & MiCant
ActiveCell.Offset(0, 1).Value = MiCant
End Sub

Sub Llama2()
Valor = ActiveCell
ActiveCell.Offset(0, 1) = Application.Run("Personal.XLS!NUMTEXT_P",
Valor)
End Sub

Sub Llama3()
ActiveCell.Offset(0, 1) = Application.Run("Personal.XLS!NUMTEXT_P",
ActiveCell)
End Sub

Cualquiera de los 3 anteriores hace lo mismo, invoca a una funcion que
se encuentra en el Personal.xls que se llama NUMTEXT_P y le manda el
valor de la celda activa.

Espero que esto te resuleva tu problema.

Saludos
Servando Villalon

> ... cuando creo un procedimiento

[Servando]

Jose:
Otro detalle mas:

En el caso de las funciones declaradas en Personal.xls, la forma de
hacer uso de ellas es también anteponiendo el libro.
Si llamas tu funcion desde el asistente de funciones, este se encarga
de todo, pero si la tecleas directamente, entonces debes, de escribir
el nombre del libro y el nombre de tu funcion.

Ejemplo:
=PERSONAL.XLS!NUMTEXT_P(A1)

Saludos
Servando Villalon
Tampico Mexico

[Jose Soler]

Sí Señor!!!, muchas gracias Servando, en cuanto mi bebe me deje lo pruebo y
comento, pero es lo que necesitaba.

Un cordial saludo,

Jose

"Servando" <servando...@desc.com.mx> escribió en el mensaje
news:3296c412.03052...@posting.google.com...

[Jose Soler]

Muchas gracias Servado, ya consegui entenderlo y hacerlo funcionar.

Un cordial saludo,

Jose

"Jose Soler" <joseso...@NOSPAMhotmail.com> escribió en el mensaje
news:#cepHX7I...@TK2MSFTNGP10.phx.gbl...