Boton de comando en un modulo

hola, (...) ?

Tengo el siguinete macro en un modulo: (...)
quisiera ponerle un boton para que se ejecute con un click, que tengo que hacer?

- incrusta en la hoja un boton desde la barra de herramientas "formulario"
- asigna la macro (ajusta su posicion, dimensiones y cambia el titulo)
- retirale "el foco" (pulsa esc)

saludos,
hector.

Que tal HB, buenos dias:

Como puedo modificar este codigo para que, la tabla que aparece de la
columna 1 a la 5 y de la fila 1 a la 5, aparesca en la siguiente de la
columna 1 a la 5 pero de la fila 8 a la 13 y que no se repitan los numero con
la tabla anterior.

asi quiero poner como 15 tablas en una hoja.

Gracias

"Héctor Miguel" escribió:

hola, (...) ?

> Tengo el siguinete macro en un modulo: (...)
> quisiera ponerle un boton para que se ejecute con un click, que tengo que hacer?

- incrusta en la hoja un boton desde la barra de herramientas "formulario"
- asigna la macro (ajusta su posicion, dimensiones y cambia el titulo)
- retirale "el foco" (pulsa esc)

saludos,
hector.

hola, (...) ???

__ 1 __

Como puedo modificar este codigo para que, la tabla que aparece de la columna 1 a la 5 y de la fila 1 a la 5
aparesca en la siguiente de la columna 1 a la 5 pero de la fila 8 a la 13

__ 2 __

y que no se repitan los numero con la tabla anterior.

__ 3 __

asi quiero poner como 15 tablas en una hoja.

1) asegurate de seleccionar la celda donde quieres que se inicie cada (nueva) tabla
y solo cambia una linea en el codigo que expusiste (concretamente la que dice)...
de: -> Cells(Fila, Col) = Unicos(Sig)
a: -> ActiveCell.Cells(Fila, Col) = Unicos(Sig)

2) (re)considera lo que estas solicitando (o amplia algunos detalles) porque...
no creo posible obtener ~15 tablas con 25 "unicos" de 36 sin duplicados en las tablas 2 a 'n' -?????-

3) se soluciona cambiando la linea en el codigo mencionada en el punto 1

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

p.d. disculpa que no me pueda dirigir a ti por tu nombre (creo que nunca te has "atrevido a exponerlo") :D

Que paso? HM!

Mi nombre es Carlos, pero creo que ayudas a tantos usuarios que no recuerdas
a todos!!

Soy quien te pidio ayuda hace unos dias para proteger uns hojas y libros,
con pasword y que borra los libros si no tiene una carpta oculta en c: "fucos
pocus" y "abracadabra"

Hare los cambios y te vaiso que sale gracias


"Héctor Miguel" escribió:

hola, (...) ???

__ 1 __
> Como puedo modificar este codigo para que, la tabla que aparece de la columna 1 a la 5 y de la fila 1 a la 5
> aparesca en la siguiente de la columna 1 a la 5 pero de la fila 8 a la 13
__ 2 __
> y que no se repitan los numero con la tabla anterior.
__ 3 __
> asi quiero poner como 15 tablas en una hoja.

1) asegurate de seleccionar la celda donde quieres que se inicie cada (nueva) tabla
y solo cambia una linea en el codigo que expusiste (concretamente la que dice)...
de: -> Cells(Fila, Col) = Unicos(Sig)
a: -> ActiveCell.Cells(Fila, Col) = Unicos(Sig)

2) (re)considera lo que estas solicitando (o amplia algunos detalles) porque...
no creo posible obtener ~15 tablas con 25 "unicos" de 36 sin duplicados en las tablas 2 a 'n' -?????-

3) se soluciona cambiando la linea en el codigo mencionada en el punto 1

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

p.d. disculpa que no me pueda dirigir a ti por tu nombre (creo que nunca te has "atrevido a exponerlo") :D

hola, Carlos !

Que paso? HM!
Mi nombre es Carlos, pero creo que ayudas a tantos usuarios que no recuerdas a todos!! ...

despues de contestar a tu consulta original diciendo: "hola, (...) ?"
recorde que eres Carlos (pero ya habia mandado la respuesta) :-(

el segundo "???" y la "recriminacion"... fue en "venganza" de que me llamaste "HB" :))

(disculpa, pero a veces las "bromas" ayudan a aligerar la rigidez) :D

saludos,
hector.