Cambiar formato Combobox en formulario en excel para Dante Amor

Buenos dias, tengo una duda enorme, tengo un combobox que jala una lista de precios que tengo en una columna de excel estos precios estan en el excel de la siguiente manera:

0

135.15

 225

712.04

1908.5

El problema es que al momento que corro el formulario, el combobox muestra los números así:

0

135,15

225

712,04

1908,5

Es decir en vez de mostrar puntos que están en el excel los muestra con comas lo cual si luego divido ese valor entre 100 no me da el ´número correcto, por ejemplo: 1908,5/100=190.85 cuando debería salir 19.085

Intente al momento de cargar los valores del combobox de agregarle lo siguiente &"" con eso pude obtener los puntos pero convertí los números en texto y al momento de dividirlos entre 100 no me permitía ya que un texto no se puede dividir.

1 Respuesta

Respuesta
1

Prueba cargar los datos al combo con el formato, por ejemplo si tus datos empiezan en la celda A1

Private Sub UserForm_activate()
    For i = 1 To 5
        ComboBox1.AddItem Format(Cells(i, "A"), "#,##0.00")
    Next
End Sub

También cambia al momento de hacer la operación utilizando la función val, por ejemplo:

Private Sub ComboBox1_Change()
    TextBox1 = Format(Val(ComboBox1) / 100, "#,##0.00")
End Sub

Prueba y me comentas

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas