Cuadro combinado_combox_ctrl I

Hola Héctor un gusto en saludarte: Gracias por lo último. Estaba
probando lo del combobox y me aparece una ventana con el siguiente
mensaje: “Se ha producido el error ‘1004’ en tiempo de ejecución:
Error en el método Select de la clase Range. Cuando clickeo “Depurar”
sombrea el siguiente texto “ Range (“a” & Fila + 11).Select “ y luego
aparece otra ventana titulada “Microsoft Office Excel está recuperando
los documentos”.
¿Será porque este libro esta vinculado con otro? . Estoy un tanto
desconcertado.

Gracias,

Carlos

hola, Carlos !

Estaba probando lo del combobox y me aparece una ventana con el siguiente mensaje:
“Se ha producido el error ‘1004’ en tiempo de ejecucion: Error en el metodo Select de la clase Range.
Cuando clickeo “Depurar” sombrea el siguiente texto “ Range (“a” & Fila + 11).Select “
y luego aparece otra ventana titulada “Microsoft Office Excel esta recuperando los documentos”.
Sera porque este libro esta vinculado con otro?. Estoy un tanto desconcertado...

el error 1004 en tiempo de ejecucion tiene un "sin-numero" de (posibles) causas
de entre las mas comunes, comprueba si se hubieran perdido referencias a librerias (en el editor de vba)
ve a (menu) edicion / referencias... y revisa si alguna dice "FALTA: xxx" o "MISSING: xxx"

si ya te habia funcionado... es probable que "algo" se hubiera cambiado desde entonces -???-
comentas (si encuentras) algun detalle mas significativo ?
saludos,
hector.

Hola Héctor. Cuando retiro o elimino la sintaxis:

Dim Fila As Integer
Select Case Val(ComboBox1.Value)
Case 1 To 7
Fila = Application.Match(Val(ComboBox1.Value), Range("a12:a60"),
0)
Range("a" & Fila + 11).Select
End Select
End Sub

...no sale más el mensaje, pero me quedo sin la opción que persigo de
automatizar con el Combobox el ir a la celda respectiva.

Tal como me has sugerido, he revisado las “Referencias –VBAPProject” y
sólo tengo habilitadas las siguientes:

1. Visual Basic For Applications
2. Microsoft Excel 12.0 Object Library
3. OLE Automation
4. Microsoft Office 12.0 Object Library
5. Microsoft Forms 2.0 Object Library

Saludos,

Carlos

hola, Carlos !

no se ve claro cual es la sintaxis que retiras o eliminas -?-
tampoco se aprecia si el codigo esta en el evento '_change' del combo o en algun otro procedimiento

si fuera el caso de que el codigo lo pusiste en el evento '_click' de algun commandbutton...
comprueba (o corrige) que su propiedad "TakeFocusOnClick" la tenga en False -?-

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

__ OP __

Cuando retiro o elimino la sintaxis:

Dim Fila As Integer
Select Case Val(ComboBox1.Value)
Case 1 To 7
Fila = Application.Match(Val(ComboBox1.Value), Range("a12:a60"), 0)
Range("a" & Fila + 11).Select
End Select
End Sub

...no sale más el mensaje, pero me quedo sin la opción que persigo de automatizar con el Combobox el ir a la celda respectiva.
Tal como me has sugerido, he revisado las “Referencias –VBAPProject” y solo tengo habilitadas las siguientes:

1. Visual Basic For Applications
2. Microsoft Excel 12.0 Object Library
3. OLE Automation
4. Microsoft Office 12.0 Object Library
5. Microsoft Forms 2.0 Object Library

La sintaxis que retiro o la elimino (temporalmente a efecto de
pruebas) esta en la hoja del ComboBox1 y en la ventanita de la derecha
“Change” (¿esto es el evento, si?):

Private Sub ComboBox1_Change()
Dim Fila As Integer
Select Case Val(ComboBox1.Value)
Case 1 To 7
Fila = Application.Match(Val(ComboBox1.Value), Range("a12:a60"),
0)
Range("a" & Fila + 11).Select
End Select
End Sub

A su vez en el otro libro que esta vinculado al primero del que
estamos comentando tengo un cuadro combinado (pero este es de lista ó
controles de formulario) donde tengo esta sintaxis, que no sé si con
esta, es la que esta creando conflicto:

Sub Listadesplegable2_AlCambiar()
' Macro grabada el 28/05/2002 por BVL
'
' Acceso directo: Ctrl+Mayús+I
'
Range("B7:B131").Select
ActiveSheet.Unprotect
Selection.SpecialCells(xlCellTypeFormulas, 1).Select
ActiveSheet.Protect DrawingObjects:=True, Contents:=True,
Scenarios:=True
End Sub

Saludos y una vez más, muchas gracias por tu atención,