Bonjour,
voilà mon travail: j'ai un fichier de données avec plusieurs colonnes pour lesquelles je dois les ranger dans le bon ordre.
Par exemple, je reçois un fichier où le nom des colonnes sont dans cet ordre:
hh jj | aa dd | bb ee | gg ii | ff cc
je voudrais pouvoir utiliser une macro qui me range automatiquement les colonnes dans cet ordre:
aa dd | bb ee | ff cc | gg ii | hh jj
bien évidemment, je ne connais pas l'emplacement des colonnes.
Donc il faudrait une macro qui détecte sur toute la ligne A de 1 à n, d'abord la chaîne de caractères aa pour mettre
la colonne "aa dd" dans la première colonne puis détecte bb pour mettre la colonne "bb ee" dans la 2e, etc...
j'espère que je suis clair.
j'ai pensé que le code pourrait commencer de cette manière:
Dim i As Long
For i = 1 To Range("A" & Rows.Count).End(xlUp).Row -->sauf que ça c'est un décompte sur toute une colonne
If InStr(Cells("A", i), "aa")
Then "placer dans la 1ere colonne"
...
voilà mon travail: j'ai un fichier de données avec plusieurs colonnes pour lesquelles je dois les ranger dans le bon ordre.
Par exemple, je reçois un fichier où le nom des colonnes sont dans cet ordre:
hh jj | aa dd | bb ee | gg ii | ff cc
je voudrais pouvoir utiliser une macro qui me range automatiquement les colonnes dans cet ordre:
aa dd | bb ee | ff cc | gg ii | hh jj
bien évidemment, je ne connais pas l'emplacement des colonnes.
Donc il faudrait une macro qui détecte sur toute la ligne A de 1 à n, d'abord la chaîne de caractères aa pour mettre
la colonne "aa dd" dans la première colonne puis détecte bb pour mettre la colonne "bb ee" dans la 2e, etc...
j'espère que je suis clair.
j'ai pensé que le code pourrait commencer de cette manière:
Dim i As Long
For i = 1 To Range("A" & Rows.Count).End(xlUp).Row -->sauf que ça c'est un décompte sur toute une colonne
If InStr(Cells("A", i), "aa")
Then "placer dans la 1ere colonne"
...