Contenu récent par PBerg45

  1. PBerg45

    XL 2016 Comment mettre les lettres d'un mot par ordre alphabétique ?

    Sans prétension, je poste une modif du code de Modeste geedee pour respecter l'ordre des mots si plusieurs mots dans une même cellule. Function SortString(ByVal iRange, Optional Croissant As Boolean = True) Dim i%, j%, S%, sTemp$, tabl tabl = Split(iRange, " ") For S = 0 To UBound(tabl) For j...