Split et Transpose en VBA

Bonjour à tous,

Je suis tout nouveau sur ce forum ; j'ai déjà parcouru pas mal de dossier et je ne trouve toujours pas la réponse à ma question.

Je souhaiterais via du code VBA :

• séparer les données d'une cellule ("a ; b ; c ; d" qui serait remplacé par 4 nouvelles lignes, chacune d'entres elle prenant les valeurs séparées par des ";")
• remplacer les noms de colonnes par des valeurs dans des cellules.

Je m'explique, j'ai un fichier excel ayant la structure suivante :

IDnb R C G

ID1 a ; b ; c d ; e f

ID2 a b ; g h

J'aimerais transférer ces données sur une table Access qui a les champs suivants :

tblSplittedCode

ID nombre(autoincrément)

IDnb texte(3)

splitValue texte(50)

CodeExc texte(1)

Pour finalement avoir une table qui ressemblerait à ceci :

ID IDnb splitValue CodeExc

1 ID1 a R

2 ID1 b R

3 ID1 c R

4 ID1 d C

5 ID1 e C

6 ID1 f G

7 ID2 a R

8 ID2 b C

9 ID2 g C

10 ID2 h G

Donc voila, j'ai expliqué mon soucis au mieux, n'hésitez pas à me poser des questions si quelque chose ne semble pas clair.

Si quelqu'un a donc une idée, je suis complètement preneur. J'aimerais boucler une première fois sur chacun des éléments séparés par des points virgules pour ensuite refaire une boucle pour chacun de ces items et peut etre passer en paramètre le CodeExc qui va bien pour insérer au cas par cas, soit R, soit C soit G.

Je ne sais juste pas comment m'y prendre.

Merci par avance.

Fabien.