Bonjour tout le monde,

Je me tourne vers vous parce que je suis un peu perdu, pour pas dire complètement.

J'ai un fichier qui a des valeurs en colonne E, ces valeurs sont séparées par des ; non triées, mais toujours à 4 chiffres.

Mon objectif est de splitter ces valeurs puis de vérifier que chaque valeur est comprise dans l'intervalle (colonne H et I).

Le fichier est assez lourd, 1M de lignes alors je vous passe un échantillon.
http://cjoint.com/?0BrqKCEWAxr

J'ai déjà essayé de faire le split, qui fonctionne cependant je pense que ce serait mieux de le stocker dans une memoire temporaire mais ça me dépasse,
si quelqu'un peut m'orienter ce serait super.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Option Explicit
 
Sub Test_split()
 
Dim val As String
Dim i As Integer
Dim test As Variant
 
val = ActiveCell.Value
test = Split(val, ";")
 
    For i = 0 To UBound(test)
 
        Cells(1, i + 1).Value = test(i)
 
    Next i
 
 
 
 
End Sub
J'espère avoir été clair, sinon je suis à votre disposition pour donner plus de précisions.

Par avance, merci,

Et bonne fin de journée