Curso Excel VBA y Macros – Cap. 33 – 10 Funciones VBA para el manejo de texto

<<CURSO COMPLETO EN YOUTUBE>>

Siguiendo con el tema de funciones, ahora veremos algunas funciones de VBA que nos ayudarán a manejar texto. Recordemos que tenemos funciones predefinidas para usar en celdas, así como funciones VBA que pueden usarse tanto en procedimientos como en celdas.

Este tema estará dividido en 3 partes.

  1. Funciones para el manejo de texto.
  2. Funciones de fecha y hora.
  3. Funciones de conversión y formato.

Ver video Capítulo 33 Excel VBA & Macros

Suscríbete al canal de EXCELeINFO en YouTube para aprender más de Excel y macros.

Listado de funciones VBA más usadas para el manejo de texto

La siguiente lista nos muestra las 10 funciones VBA para manejo de texto más usadas.

Nombre de la función

Descripción

InStr

Devuelve la posición de una cadena de texto dentro de otra.

LCase

Convierte un texto a minúsculas.

UCase

Convierte un texto a MAYÚSCULAS.

Left

Devuelve cierta cantidad de caracteres desde la izquierda.

Rigth

Devuelve cierta cantidad de caracteres desde la derecha.

Mid

Devuelve cierta cantidad de caracteres dada una posición.

Len

Devuelve el número de caracteres de una cadena de texto

Replace

Reeemplaza una cadena de texto dentro de otra cadena.

StrConv

Devuelve una cadena de texto convertida a minúsculas, MAYÚSCULAS o Nombre propio.

Trim

Elimina espacios excesivos de una cadena de texto

vbNewLine

Inserta una nueva línea de texto en un Cuadro de mensaje MsgBox

vbTab

Añade un espacio de tabulación en un Cuadro de mensaje MsgBox

Código VBA de las macros

Option Explicit

Sub Funciones_de_Texto()

Range("C6").Value = VBA.InStr(Range("C4"), Range("C5"))
Range("C8").Value = VBA.LCase(Range("B8"))
Range("C9").Value = VBA.UCase(Range("B9"))
Range("C10").Value = VBA.Left(Range("b10"), 5)
Range("C11").Value = VBA.Right(Range("b11"), 6)
Range("C12").Value = VBA.Mid(Range("B12"), 11, 5)
Range("C13").Value = VBA.Len(Range("B13"))
Range("C14").Value = VBA.Replace(Range("B14"), "Macros", "VBA")
Range("C15").Value = VBA.StrConv(Range("B15"), vbLowerCase)
Range("C16").Value = VBA.StrConv(Range("B16"), vbUpperCase)
Range("C17").Value = VBA.StrConv(Range("B17"), vbProperCase)
'Range("C18").Value = VBA.Trim(Range("B18"))
Range("C18").Value = Application.WorksheetFunction.Trim(Range("B18"))

MsgBox "Mensaje de prueba" & vbNewLine & "Otro mensaje"
MsgBox "Mensaje de:" & vbTab & "prueba"

End Sub

Descarga el archivo de ejemplo

033 – Funciones VBA para manejo de texto.zip

<<CURSO COMPLETO EN YOUTUBE>>

Si te gustó este tutorial por favor regístrate en nuestra Lista de correo y Suscríbete a nuestro canal de YouTube para que estés siempre enterado de lo nuevo que publicamos.

You may also like...

Leave a Reply

Your email address will not be published. Required fields are marked *