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

hakim.83 · 22 Février 2012

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 · 22 Février 2012

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 · 22 Février 2012

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

Une réponse svp .

Dull · 23 Février 2012

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

Code:

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

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

hakim.83

Guest

Pièces jointes

Salmander

XLDnaute Occasionnel

hakim.83

Guest

Dull

XLDnaute Barbatruc

Discussions similaires

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

hakim.83

Guest

Pièces jointes

Salmander

XLDnaute Occasionnel

hakim.83

Guest

Dull

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency