Cómo encontrar la posición de un carácter especial en Excel mediante VBA

Como programador , usted va a trabajar con una gran cantidad de cadenas. La capacidad de encontrar la posición de un carácter particular en Excel utilizando Visual Basic para aplicaciones que puede ahorrar mucho tiempo al escribir su código. Anteriormente, lo haría recorrer cada carácter en una cadena y utilizar un contador para realizar un seguimiento de la posición. Ahora, en VBA , puede utilizar la función InStr para buscar un carácter particular y devolver la posición . Instrucciones
1

lanzamiento Microsoft Excel y escriba " Encontrar la posición de cualquier personaje en esta frase. " En A1. Haga clic en la pestaña de " desarrolladores" y haga clic en "Visual Basic " para abrir el Editor de Visual Basic . Añadir un nuevo módulo de código VBA haciendo clic en el menú "Insertar " y haciendo clic
2

Añadir un nuevo procedimiento con el código siguiente "Módulo ". :

Private Sub findPositionOfCharacter ()
3

Crear las siguientes tres variables que va a utilizar para encontrar la posición de tu personaje :

MiCadena As StringDim mychar Como StringDim Pos Como
Integer
4

Definir el carácter que desea encontrar y obtener la sentencia se encuentra en A1 :

mychar = Range " d" ( "A1 ") SelectmyString = Range (" A1") . . Valor
5

Copia y pega el siguiente código para encontrar la posición del carácter definido en el paso anterior y mostrar un mensaje con su posición :

Pos = InStr ( 1 , miCadena , mychar , vbTextCompare ) MsgBox ( " La posición de " "y mychar &" 'es : "& Pos)
6

tipo " End Sub " para poner fin a su procedimiento y presione "F5 " para ejecutar el código VBA.