¿Alguna vez quisiste invertir el contenido de lo que está contenido en una celda? Usando la función StrReverse en VBA, puede cambiar fácilmente «Mi texto» a «txet yM».

Dim sTemp As String

sTemp = "My text"

sTemp = StrReverse(sTemp)

Cuando esté completo, el texto de la variable sTemp será igual a «txet yM». Si desea invertir el contenido de una celda en una hoja de trabajo, puede usar lo siguiente:

Selection = StrReverse(Selection)

Esto invierte cualquier celda seleccionada en la hoja de trabajo. Sin embargo, me parece útil ampliar un poco el uso para asegurarme de que solo se selecciona una celda y que la celda no contiene una fórmula:

If Selection.Count =1 Then     If Not Selection.HasFormula Then Selection = StrReverse(Selection)

End If

Esta macro solo afecta a una sola celda seleccionada y no realizará ningún cambio en una celda que contenga una fórmula.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (3451) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

enlace: / excel-Reversing_Cell_Contents [Inversión del contenido de la celda].