300 Ejemplos

Cuerdas inversas

Reverse Strings

A continuación veremos un programa en Excel VBA eso puede cuerdas inversas .

Situación:



Cadena inversa en Excel VBA



cómo nombrar un rango de celdas en Excel

Coloque un Botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:

1. Primero, declaramos cuatro variables. Una variable llamada texto de tipo String, una variable llamada reversedText también de tipo String, una variable llamada longitud de tipo Integer y una variable llamada i de tipo Integer.



NingunotextoComoString, reverseTextComo Cuerda, largoComo Entero, IComo Entero

2. Inicializamos dos variables. Usamos la función InputBox para obtener una cadena de texto del usuario. Usamos la función Len en Excel VBA para obtener la longitud de una cadena.

cómo contar dígitos en Excel
text = InputBox ('Ingrese el texto que desea revertir')
longitud = Len (texto)

Ingrese texto

3. Comenzamos un ciclo For Next.



Parai = 0Alongitud - 1

4. Ahora viene el truco simple. Tomamos el último carácter del texto y lo colocamos al frente de ReversedText. Podemos usar la función Mid en Excel VBA para extraer un carácter de una cadena. Usamos el operador & para concatenar (unir) dos cadenas.

reversedText = reversedText & Mid (texto, (longitud - i), 1)

5. No olvide cerrar el ciclo.

PróximoI

Ejemplo: texto = 'Coche'. La longitud del texto es 3. Para i = 0 a 2, extraemos la subcadena de texto que comienza en la longitud de la posición - i con longitud 1. Por lo tanto, para i = 0, Mid (text, 3, 1) es igual a r. Colocamos r en la primera posición de reverseText. Para i = 1, Mid (texto, 2, 1) es igual a a. Agregamos un a reverseText que se convierte en ra. Para i = 2, Mid (text, 1, 1) es igual a C. Agregamos C a reverseText que se convierte en raC.

cómo escribir vlookup en Excel

6. Finalmente, mostramos invertedText usando un MsgBox.

msgbox reverseText

7. Pruebe el programa.

Resultado:

Resultado de cadena inversa

3/5 Completado! Obtenga más información sobre la manipulación de cadenas>
Ir al capítulo siguiente: Fecha y hora



^