Con combo1.ListIndex = - 1 mostraba mensage error 777 en t. ejecución "no se ha utilizado correctament el List Index entonces lo puse asi
Me.combo1.Value = combo1 - 1 y funciona en un combo de tipo númerico y en uno de texto use algo como esto combo2.Value = "Si" ya que de la otra forma decis "no coinciden los tipos"
Gracias David!!