Impedir volcar dato de un ComboBox si este no comienza con determinadas letras
Tengo el siguiente Combobox, el cual al presionar un botón, pasa el dato a la celda F5, el problema que tengo es que quiero que si el dato que se selecciona en el ComboBox no comienza con las letras "FC", se muestre un mensaje indicando que hay un error y no se copie el dato a F5:
Private Sub CommandButton1_Click()
Range("F5") = ComboBox1
Unload Me
End Sub
1 Respuesta
En el link hay un ejemplo para trabajar cadenas de texto
http://www.programarexcel.com/2013/06/macro-extrae-cadenas-de-texto-o-string.html
Deberías extraer o determinar cuales son las dos primeras letras de la cadena ingresada en el combobox y determinar si es igual a FC
Private Sub CommandButton1_Click()
cadena=Left(combobox1,2)
If cadena <> "FC" then
msgbox ("Error en el texto seleccionado, los datos no se copiaran, revise")
exit sub
end if
Range("F5") = ComboBox1
Unload Me
End Sub
visita http://www.programarexcel.com/p/home.html encontrarás cientos de ejemplos de macros.
