Extraire une lettre d'une cellule d'un tableau excel

Bonjour,
Je souhaite extraire une lettre spécifique dans une cellule d'un tableau excel et reproduire cette lettre dans une autre cellule d'une autre colonne.

exemple:
A1=9C12345E
A2=9C1234EXXXX
A3=9C123

Je souhaite extraire le lettre E et la reproduire dans une cellule B1;B2 ou B3.
La cellule B3 sera donc vide car la A1 ne contient pas la lettre E.
Merci d'avance pour vos répnses.

Salut
Le VBA est fait pour faire des petites opérations comme celle la. Je te conseil de chercher quelques tutos sur le VBA, c'est vraiment pas difficile.
A+
____________________________________________________________________________
Mon site internet :  

Bonjour ,

Un exemple a exploiter

Dim i As Integer, j, Ligne
Dim Mot, Lettre, MotReconstitué As String, LettreE

For Ligne = 1 To 10
MotReconstitué = ""
LettreE = 0
Mot = Trim(Feuil1.Cells(Ligne, 1).Value)
For i = 1 To Len(Mot)
Lettre = Mid(Mot, i, 1)
If Lettre <> "E" Then
MotReconstitué = CStr(MotReconstitué) & CStr(Lettre)
Else
LettreE = LettreE + 1
End If
Next

Feuil1.Cells(Ligne, 1).Value = MotReconstitué
Feuil1.Cells(Ligne, 2).Value = ""

If LettreE > 0 Then
For j = 1 To LettreE
Feuil1.Cells(Ligne, 2).Value = Feuil1.Cells(Ligne, 2).Value & "E"
Next
End If


Dedenet2