bom dia!
Ale, o colchete foi erro de digitação ao criar o tópico. Quanto ao problema, consegui sana-lo, digo isso por que não entendo a lógica, mas parou de acusar o erro e ficou assim:
cbxReferencia2.Clear
If cbxCliente2.ListIndex > -1 Then
Sheets(cbxCliente2.List(cbxCliente2.ListIndex, 0)).Select
Else
MsgBox "Dados Transferidos"
End If
'plan1 0
'plan2 1
'plan3 2
'plan4 3
Não sei se devo considerar o tópico resolvido, posso!?
Postado : 09/12/2013 3:39 am