formulario

01/02/2009 - 01:33 por LUIS DANNY SALAS | Informe spam
Hola!
tengo un cuadro combinado que modifica una determinada celda, cuando yo
copio ese cuadro combinado y lo pego varia filas abajo yo quisiera que al
igual como sucede con las formulas
el cuadro cambiara automaticamente la celda a la que está vinculada por la
que corresponde al numero de celdas mas abajo que lo estoy pegando, pero no
sucede así , el nuevo cuadro que he pegado sigue estando vinculado a la
misma celda que el original, lo cual me implica el trabajo de modificar las
propiedades del cuadro para vincularlo al a celda correcta.
Existe alguna forma?


GRACIAS
 

Leer las respuestas

#1 LUIS DANNY SALAS
01/02/2009 - 02:57 | Informe spam
excelente!!!
no sabes el tiempo que me ha ahorrado tenia que copiar un grupo de casi 20
formularios 40 veces hacia abajo, y habría tenido que cambiar uno a uno las
respectivas celdas vinculadas
GRACIAS!

"Héctor Miguel" escribió en el mensaje
news:%
hola, Luis !

... un cuadro combinado... modifica una determinada celda
cuando... copio ese cuadro combinado y lo pego varia filas abajo
... quisiera que... cambiara automaticamente la celda a la que esta
vinculada
por la que corresponde al numero de celdas mas abajo que lo estoy pegando
...



cuando copias celdas con/u objetos incrustados, se van "con todo y sus
propiedades" (incluidas las de los objetos)
y se requiere codigo para modificar (p.e.) la celda a la que debiera
quedar vinculada cada objeto :-(

una vez que hayas copiado n_celdas con sus combox (y/o hayas incrustado
n_combos en las celdas donde las necesites)...
si suponemos/asumimos/... que los combos son de la barra de herramientas
"formularios" (NO de la de "cuadro de controles") <= OJO
y suponemos que cada combo esta quedando superpuesto (precisamente)
"dentro" de la esquina superior izquierda de "su celda"
y suponemos que la celda vinculada "correspondiente" debe ser la que esta
una columna a la izquierda de la ubicacion del combo
prueba con las siguientes instrucciones ejecutadas desde el editor de VBA
=> {Alt}+{F11} en la ventana de inmediato => {ctrl}+G
OJO todo es una sola linea y no pierdas de vista que hay dos veces "dos
puntos" -> :
y pulsas enter para que se ajuste cada combo con su celda

for each combo in activesheet.dropdowns: combo.linkedcell =
combo.topleftcell.offset(,-1).address: next

si la esquina superior izquierda de cada casilla NO esta "dentro" de su
celda, sino "ligeramente" sobre la celda superior...
-> cambia la propiedad "topleftcell.offset(,-1).address" por ->
topleftcell.offset(1,-1).address

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

Preguntas similares