Gestion des format avec des variables tableaux

[Troudz]

Bonjour tout le monde,

J'ai un gros volumes de données à transférer d'un classeur à un autre.
Pour cela, j'ai pris l'habitude d'utiliser une variable tableau qui offre une grande rapidité d'exécution.
Je faisais comme ceci :

    Dim Mon_Tbl()
    Mon_Tbl = Fichier_Source.Sheets("Feuil1").Cells(1, 1).Resize(NbLignes, NbColonnes).Value

Mais aujourd'hui, je me retrouve avec un classeur comportant un grand nombre de formats de cellules différents.
Or en procédant comme à mon habitude, je n'ai que les données "brutes" dans ma variable tableau.
Ainsi une cellule qui a pour valeur "90%" deviendra "0,9" lors de la recopie dans un nouveau classeur.

Comment pourrais - je procéder pour importer également les formats utilisés dans chaque cellule tout en gardant une rapidité d'exécution équivalente ?

Je vous remercie par avance de votre aide.

Bonne journée

 

[kjin]

Re : Gestion des format avec des variables tableaux

J'ai un gros volumes de données à transférer d'un classeur à un autre.

pourquoi ne pas copier directement les données ?!

Comment pourrais - je procéder pour importer également les formats utilisés dans chaque cellule

Impossible, hormis à stocker provisoirement le format pour les ré-appliquer ensuite mais bon...
A+
kjin

 

[Troudz]

Re : Gestion des format avec des variables tableaux

Bonjour Kjin et merci pour ta réponse

pourquoi ne pas copier directement les données ?!

J'ai pris l'habitude de passer par une variable tableau car l'exécution est bien plus rapide, surtout quand j'ai des recopies et des retraitement multiples à faire.

Du coup j'ai procédé avec deux vilaines boucles entre lassées.

Merci quand même de t'être penché sur mon problème.

Bonne journée