Question sur les Chaines de caractères

Bonjour

Ma question est toute simple mais pas facile à mettre en oeuvre , avec le mot CAHIER par quelle instruction pourrais obtenir chacun des

des caractères de ce mot par message box ?

j'ai essayé une instruction du type

dim i 
for i =1 to 4
msgbox left("CAHIER",i)
next

j'obtiens successivement C , CA , CAH, CAHI,.... au lieu d'avoir dans les msgbox les caractères C,A,H,I,E,R de facon séparés

Comment puis je corriger mon instruction ?

Merci à vous pour toute suggestion.

Bonsoir,

essayer avec :

MsgBox Mid("CAHIER", i, 1)

@ + +

Merci R@chid , c'est exactement ce qu'il me fallait , ne voulant pas ouvrir un autre topic pour une nouvelle question reprenant cet notion ,pourquoi l'expression suivante ne marche t elle pas ,.. il s'agit de comparer le caractère extrait à une colonne de nombres et de donner la valeur de ce nombre par msgbox en utilisant Vlookup.

MsgBox Application.WorksheetFunction.VLookup(Sheets("Feuil3").Mid(Range("e8").Value, i, 1), Sheets("Feuil3").Range("A1:B26"), 2, 0)

Merci

j'ai trouvé

tout bete ..! en l'ecrivant plutot ainsi :

With Sheets("Feuil3")
For i = 1 To 3
MsgBox Application.WorksheetFunction.VLookup(Mid(Range("e8"), i, 1), Range("A1:B26"), 2, 0)
Next
End With
End Sub

Merci quand meme