Séparer les lettres et les chiffres d'une cellule plus changer le choix

[hakim.83]

Salut à tous,
question simple ,je saisie dans la colonne E des lettres et les chiffres je recherche Séparer les lettres et les chiffres d'une cellule sélectionner
et autre question pour Changement de mois automatique
merci

 

[Salmander]

Re : Séparer les lettres et les chiffres d'une cellule plus changer le choix

Si le format des données ne change pas : =GAUCHE(E17;CHERCHE(" ";E17)-1) & =DROITE(E17;NBCAR(E17)-CHERCHE(" ";E17))

 

[hakim.83]

Re : Séparer les lettres et les chiffres d'une cellule plus changer le choix

Une réponse svp .

 

[Dull]

Re : Séparer les lettres et les chiffres d'une cellule plus changer le choix

Salut hakim.83, Salamender, le Forum

pour la 1ère question essaye ce code à placer dans le module de la feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, [E17:E100]) Is Nothing Then
    [F16].FormulaLocal = "=SI(" & Target.Address & "="""";"""";GAUCHE(" & Target.Address & ";TROUVE("" "";" & Target.Address & ";1)-1))": [F16] = [F16].Value
    [G16].FormulaLocal = "=SI(" & Target.Address & "="""";"""";STXT(" & Target.Address & ";TROUVE("" "";" & Target.Address & ";1)+1;10))": [G16] = [G16].Value
End If
End Sub

Bonne Journée