VBA excel : extraction dans un réel à virgule [Résolu/Fermé]

Signaler
-
 Yeti -
Bonjour,

J'ai une colonne de données dans excel avec des nombre réels du type "2.1"

Mon objectif est de réussir à "extraire" le nombre à gauche de la virgule : ici "2", et celui à sa droite : ici "1" ;
afin de réaliser ensuite des calcules distincts.

Quelqu'un aurait-il la solution?

Merci

2 réponses

Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
3 468
Salut,

Dans B1 tu mets =ENT(A1)
Dans C1 tu mets =MOD(A1;B1)
Salut,

C'est pas mal du tout.

Le problème c'est que c'est une formule excel, et je dois traiter des milliers de lignes.

Comment l'appliquer à une macro afin d'effecter une boucle for sur toute les lignes.

Merci
Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
3 468
Re,

Et pourquoi ne tires tu la formule vers le bas?
Oui c'est possible avec une macro

Sub separer()
    For r = 1 To Range("a1").End(xlDown).Row
      v = Split(Cells(r, 1), ",")
      Cells(r, 2) = v(0)
      Cells(r, 3) = v(1)
    Next
End Sub

Génial ça marche niquel.

Je préfère la macro parceque c'est plus rapide pour faire l'opération sur plusieurs fichier.

Merci beaucoup en tout cas, je vais pouvoir faire pas mal de trucs avec ça.