Avez-vous déjà voulu inverser le contenu de ce qui est contenu dans une cellule? En utilisant la fonction StrReverse dans VBA, vous pouvez facilement changer «Mon texte» en «txet yM».

Dim sTemp As String

sTemp = "My text"

sTemp = StrReverse(sTemp)

Une fois terminé, le texte de la variable sTemp sera égal à « txet yM ». Si vous souhaitez inverser le contenu d’une cellule dans une feuille de calcul, vous pouvez utiliser ce qui suit:

Selection = StrReverse(Selection)

Cela inverse la cellule sélectionnée dans la feuille de calcul. Je trouve cependant utile de développer un peu l’utilisation pour m’assurer qu’une seule cellule est sélectionnée et que la cellule ne contient pas de formule:

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

End If

Cette macro n’affecte qu’une seule cellule sélectionnée et n’apportera aucune modification à une cellule contenant une formule.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (3451) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365. Vous pouvez trouver une version de cette astuce pour l’ancienne interface de menu d’Excel ici:

link: / excel-Reversing_Cell_Contents [Inverser le contenu des cellules].