hacer macros aleatorias

10/09/2007 - 19:17 por daniel | Informe spam

Hola a Todos
se puede hacer lo siguiente:
1) en un userform tengo 4 label y un comandbutton.
los label tienen macro en el evento click.
necesito que al pulsar el comandbutton se pulse un label distinto cada vez o
de forma aleatoria si se puede repetir algunas veces y que me ejecute su
macro.
2) que en una hoja excel al seleccionar la delda a20 se ejecuten 5 macros de
forma tambien aleatoria.
3) se puede mostar una imagen o una letra o que cambie de color la celda
seleccionada pero luego al cambiar a otra uelva a poner el resultado como
estaba en la celda que habia seleccionado anterior mente

un saludo y muchas gracias
Daniel

Siga el debate

7 respuestas

Tengo una respuesta

Preguntas similare

Leer las respuestas

#6 Héctor Miguel

12/09/2007 - 19:28 | Informe spam

hola, daniel !

... el punto 2 no me hace lo mismo que la que habia echo yo
me pinta todas las celdas que voy pinchando y yo solo quiero una la activa
dime la forma de formato condicional haber si es mejor o mas facil.

1) selecciona todas las celdas de 'esa' hoja [o solo del rango que necesites para probar]
2) ve a [menu] formato / formato condicional...
a) condicion1 = formula
b) formula: -> =y(celda("fila")=fila(),celda("columna")=columna())
c) [boton] formato... -> aplica formatos segun tus preferencias
3) copia/pega las siguientes lineas ==en el modulo de codigo de 'esa' hoja==Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[a1].Calculate
End Sub

nota: si al modelo 'le afecta' que en cada cambio de seleccion se re/calcule la celda 'A1'...
cambia la instruccion a: -> Application.ScreenUpdating = True

y toma en cuenta que mi sistema usa como separador de argumentos a la coma ',' NO al punto y coma ';' :D

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Responder a este mensaje

#7 daniel

13/09/2007 - 18:31 | Informe spam

Hola Hector Miguel
Muchisimas gracias es perfecto justo lo que queria
siento haber te echo perder un tiempo tan valioso.

un saludo
Daniel
"Héctor Miguel" escribió en el mensaje
news:

hola, daniel !

... el punto 2 no me hace lo mismo que la que habia echo yo
me pinta todas las celdas que voy pinchando y yo solo quiero una la
activa
dime la forma de formato condicional haber si es mejor o mas facil.

1) selecciona todas las celdas de 'esa' hoja [o solo del rango que
necesites para probar]
2) ve a [menu] formato / formato condicional...
a) condicion1 = formula
b) formula: -> =y(celda("fila")=fila(),celda("columna")=columna())
c) [boton] formato... -> aplica formatos segun tus preferencias
3) copia/pega las siguientes lineas ==en el modulo de codigo de 'esa'
hoja==> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[a1].Calculate
End Sub

nota: si al modelo 'le afecta' que en cada cambio de seleccion se
re/calcule la celda 'A1'...
cambia la instruccion a: -> Application.ScreenUpdating = True

y toma en cuenta que mi sistema usa como separador de argumentos a la coma
',' NO al punto y coma ';' :D

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida