Re, PierreJean, Bebere et le forum,
@ Bebere, Est-il possible de trier la colonne A et la ligne 1 de la feuil3?
Que signifie cette ligne :
ColData.Add CStr(Tablo(i, 1)), CStr(Tablo(i, 1))
@PierreJean, Tu as une approche que Bebere, as-tu le temps de commenter ton code? Cela me permet de le comprendre.
Comme Bebere me l'a dit: le gros avantage avec les tableaux,tout se passe en mémoire. Merci de m'aider à transformer ma ligne de commande en utilisant les tableaux:
Range('G2:M2').Copy Destination:=Range('G5:G' & n_line)
avec n_line = ActiveSheet.Range('A65536').End(xlUp).Row
Si je definis mes tableaux de la maniere suivante:
With Sheets('data2')
'Ligne des cellules contenant des formules
LigneSource = .Range('G2:M2')
'Plage cible pour la recopie de la LigneSource
PlageCible = .Range('G5:M' & .Range('A65536').End(xlUp).Row)
End With
Est-ce correct?
Comment maintenant traduire en code la demarche suivante:
Pour chaque ligne de PlageCible
Copier chaque cellule de LigneSource
dans la cellule correspondante de la ligne PlageCible
Si quelqu'un peut m'aider Merci d'avance
Bien amicalement
KIM