Ejecutar macro desde función

Simplemente, pon el nombre del procedimiento en una línea de la función, p.ej.:

Function MiFunción()
MiProcedimiento
End Function

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje news:

¿Como se ejecuta una macro desde una función?

Saludos

Pero yo lo que quiero es que cuando una celda indeterminada no este vacia se
ejecute una macro automaticamente, esta macro lo que debe de hacer es copiar
el formato de otra celda y pegarlo en una tercera si esta vacia.

Un saludo y gracias.


"Fernando Arroyo" escribió en el mensaje
news:
Simplemente, pon el nombre del procedimiento en una línea de la función,
p.ej.:

Function MiFunción()
MiProcedimiento
End Function

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje
news:

¿Como se ejecuta una macro desde una función?

Saludos

Pienso que alguno de los eventos Worksheet_Change o Workbook_SheetChange pueden servirte, pero hay una cosa de las que dices que no comprendo: con "celda indeterminada", ¿te refieres a cualquier celda de la hoja, o del libro, o quizás de un rango...? Y también tendrás que decirnos la celda de la que se debe copiar el formato, en qué celda habría que pegarlo, y el nombre de la hoja (u hojas si fueran varias).
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje news:%

Pero yo lo que quiero es que cuando una celda indeterminada no este vacia se
ejecute una macro automaticamente, esta macro lo que debe de hacer es copiar
el formato de otra celda y pegarlo en una tercera si esta vacia.

Un saludo y gracias.


"Fernando Arroyo" escribió en el mensaje
news:
Simplemente, pon el nombre del procedimiento en una línea de la función,
p.ej.:

Function MiFunción()
MiProcedimiento
End Function

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje
news:
> ¿Como se ejecuta una macro desde una función?
>
> Saludos
>
>

Te explico en detalle:
En la celda A1 (por ejemplo) he añadido una lista de valores seleccionando
"Datos" - "Validación" - "permitir" = "lista" y luego le he puesto para que
pueda seleccionar una lista de características, las cuales están en otra
parte de la hoja, ah, todo desde la misma hoja, pues bien, en la celda A2
quizas también necesite seleccionar alguna otra característica de la lista
creada anteriormente (será el usuario quien seleccione cuantas
características quiera) o quizas no, si es que si al usuario le debe de
aparecer una lista en A2 con los posibles valores a seleccionar, si es que
no no debe de aparecer la lista y así sucesivamente.
Otra solución sería que el usuario fuera seleccionando de una lista y se
fuera añadiendo a una tabla que apareciera debajo de esa lista.
La verdad es que no se si me he explicado.

Un saludo y muchas gracias. JF.

"Fernando Arroyo" escribió en el mensaje
news:%
Pienso que alguno de los eventos Worksheet_Change o Workbook_SheetChange
pueden servirte, pero hay una cosa de las que dices que no comprendo: con
"celda indeterminada", ¿te refieres a cualquier celda de la hoja, o del
libro, o quizás de un rango...? Y también tendrás que decirnos la celda de
la que se debe copiar el formato, en qué celda habría que pegarlo, y el
nombre de la hoja (u hojas si fueran varias).
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje
news:%

Pero yo lo que quiero es que cuando una celda indeterminada no este vacia

se

ejecute una macro automaticamente, esta macro lo que debe de hacer es

copiar

el formato de otra celda y pegarlo en una tercera si esta vacia.

Un saludo y gracias.


"Fernando Arroyo" escribió en el mensaje
news:
Simplemente, pon el nombre del procedimiento en una línea de la función,
p.ej.:

Function MiFunción()
MiProcedimiento
End Function

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje
news:
> ¿Como se ejecuta una macro desde una función?
>
> Saludos
>
>

Quizás te sirva el siguiente código, que va en el módulo de la hoja:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count <> 1 Then Exit Sub
If Target = "$A$1" Or [A1] = "" Or Intersect(Target, Rows(1)) Is Nothing Then Exit Sub
[A1].Copy
Target.PasteSpecial xlPasteValidation
Application.CutCopyMode = False
End Sub


Pero, si he entendido lo que necesitas, quizás sería mejor que usaras un formulario para presentar una lista de las características y que el usuario eligiera las que deseara. Esto te evitaría tener que andar dando y quitando formato a las celdas de la hoja.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Juanfran" escribió en el mensaje news:On$zK%

Te explico en detalle:
En la celda A1 (por ejemplo) he añadido una lista de valores seleccionando
"Datos" - "Validación" - "permitir" = "lista" y luego le he puesto para que
pueda seleccionar una lista de características, las cuales están en otra
parte de la hoja, ah, todo desde la misma hoja, pues bien, en la celda A2
quizas también necesite seleccionar alguna otra característica de la lista
creada anteriormente (será el usuario quien seleccione cuantas
características quiera) o quizas no, si es que si al usuario le debe de
aparecer una lista en A2 con los posibles valores a seleccionar, si es que
no no debe de aparecer la lista y así sucesivamente.
Otra solución sería que el usuario fuera seleccionando de una lista y se
fuera añadiendo a una tabla que apareciera debajo de esa lista.
La verdad es que no se si me he explicado.

Un saludo y muchas gracias. JF.