Récupération de chiffre

[Bruce68]

Bonsoir à tous

J'importe un fichier CSV dans excel et dans la colonne A de mon fichier exemple je voudrais récupérer que les chiffres et mettre ceux ci sur la meme ligne mais dans la colonne D (Dans le fichier normal j'ai des centaines de chiffres).
Une âme charitable pourrait elle me faire une macro pour effecter ce travail.
Je vous remercie d'avance.

 

[JCGL]

Re : Récupération de chiffre

Bonjour à tous,

Peux-tu essayer D2 et vers le bas :

=SUBSTITUE(SUBSTITUE(A2;"@I";"");"@";"")

et si tu souhaites utiliser la valeur pour un calcul

=SUBSTITUE(SUBSTITUE(A2;"@I";"");"@";"")*1

A+ à tous

 

[Bruce68]

Re : Récupération de chiffre

Bonsoir JCGL et le forum

Merci beaucoup JCGL pour les formules cela fonctionne bien.
J'aurais aimé une macro car c'est plus rapide à mettre en place.
Je vous remercie de votre aide.
Bonne soirée à tous

 

[JCGL]

Re : Récupération de chiffre

Bonjour à tous,

Peux-tu essayer :

Sub Test()
    With Feuil1.Range("D2:D" & Feuil1.Range("A" & Rows.Count).End(xlUp).Row)
        .Formula = "=SUBSTITUTE(SUBSTITUTE(RC[-3],""@I"",""""),""@"","""")*1"
        .Value = .Value
    End With
    Range("D1").Select
End Sub

A+ à tous

 

[Bruce68]

Re : Récupération de chiffre

Bonsoir JCGL et le forum

Merci beaucoup JCGL c'est exactement ce que je voulais.

Bonne soirée à tous