Menu
  1. Accueil
  2. Forum d'assistance informatique
  3. Programmation
  4. VB / VBA

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
Afficher la suite

2 réponses

Réponse 1 / 2
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)
Signaler

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
Réponse 2 / 2
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
Signaler

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.
Posez votre question