duda combobox

[ducados]

recuro a vosotros por el siguiente tema.

tengo un combobox que al ejucartlo enpieza siempre por la primera casilla (a1), es posible que empieze con (a4) y terminne (a30)

este es el codigo que uso

Private Sub ComboBox1_Change()

Dim i As Integer

Dim final As Integer

Dim FINAL2 As Integer

Dim J As Integer

Dim H As Integer

For i = 2 To 1000

If Hoja5.Cells(i, 2) = "" Then

final = i - 1

Exit For

End If

Next

For i = 2 To final

If ComboBox1 = Hoja5.Cells(i, 2) Then

T1 = Hoja5.Cells(i, 2)

T2 = Hoja5.Cells(i, 1)

T7 = Hoja5.Cells(i, 3)

Label75 = Hoja5.Cells(i, 3)

Label76 = Hoja5.Cells(i, 6)

Label82 = Hoja5.Cells(i, 8)

Label84 = Hoja5.Cells(i, 9)

Exit For

End If

Next

End Sub

Private Sub ComBoBox1_Enter()

Dim i As Integer

Dim final As Integer

Dim tareas As String

ComboBox1.BackColor = &H80000005

For i = 1 To ComboBox1.ListCount

'Remove an item from the ListBox.

ComboBox1.RemoveItem 0

Next i

For i = 2 To 1000

If Hoja5.Cells(i, 2) = "" Then

final = i - 1

Exit For

End If

Next

'If ComboBox1.ListCount < 1 Then

'ComboBox1.AddItem "-"

For i = 2 To final

tareas = Hoja5.Cells(i, 2)

ComboBox1.AddItem (tareas)

Next

'End If

End Sub

gracias un saludo

espero buestras respuestas

[shahuinto]

en verdad no se lo que quieres, debes ser mas especifico, y adjuntar tu archivo para ayudarte. Saludos