Variar posición de un combobox

"kusflo" (donotspam)> escribió en el mensaje news:

¿Cómo puedo lograr que la posición de un combobox cambie en función de la
celda a la que esta relacionado mediante la propiedad "LinkedCell"?. Lo que
quiero saber es como puedo hacer que la posición absoluta del combobox cambie
(por ejemplo que vaya bajando en función de lo que yo le asigne a la
propiedad "linkedcell" mediante código).

Partiendo de la base que el valor de la celda asignada a la propiedad '.LinkedCell' lo modifica precisamente el cambio de selección del 'ComboBox', tan sólo tienes que interceptar el evento '_AlCambiar' del objeto.

Selecciona el control, y en la barra de herramientas "Formularios", presiona el icono "Modificar código", y en un módulo estándar se te mostrará el procedimiento.
Luego puedes hacer por ejemplo algo similar a lo siguiente:

'******************
Sub ListaDesplegable1_AlCambiar()
Dim cboLista As DropDown
Set cboLista = ActiveSheet.DropDowns("Lista desplegable 1")
With cboLista
MsgBox "Valor en LinkedCell = " & .Range(.LinkedCell).Text
.Top = 0
.Left = 0
...
End With
End Sub
'******************


Saludos
( ! ) Respuestas precedentes en Google:
http://groups.google.com/group/micr...c.es.excel
( i ) Temperancia en el foro:
http://support.microsoft.com/defaul...newsreglas