VBA récupérer 1ère lettre à gauche d'un mot

Bonjour à tous,

Je bloque pour écrire ce code (récupérer la 1ère lettre à gauche de la cellule "W20"

Sub Macro2()
Dim Ng As String
    Ng = Range("w20").FormulaR1C1 = "=LEFT(RC,1)"
End Sub

çà donne "faux" comme résultat

Ou est mon erreur ?

amicalement

Claude.

Salut Claude,

Essaies en remplaçant:

    Ng = Range("w20").FormulaR1C1 = "=LEFT(RC,1)" 

par

Ng = Left(Range("W20").Value, 1)

Souri84

Salut, Thibaut,

Ok, je vais ajouter ce code dans ma biblio .

au fait, tu mas pas répondu si le bogue des tris est réglé sur la tienne !

amicalement et merci

Claude.

re,

je n'ai pas encore revue ce code, j'ai trop de boulot pour revoir ce truc en ce moment.... je reverrais cela un peu plus tard....

Thibaut