Formule/Macro copie de format de cellule

[aurelgillm]

Bonjour à tous,

je viens sur ce forum comme je vois qu'il y a des pros de Excel 2007.
J'ai un soucis actuellement dont voici l'explication :

Sur excel 2007, j'ai 3 tableaux, chacun sur une feuille différente, Le 1er tableau (appelé A pour faciliter) c'est ladedans que je rentre des valeurs numériques, avec plus ou moins de virgule, et les signes >, < en format spécial pour que ce soit pris en nombre. OK jusque là j'espère que vous suivez.
Le tableau 2 (B) sur la 2eme feuille : Chaque cellule appel avec la fonction INDIRECT une certaine cellule (pas dans le meme ordre).
Le tableau 3 (C) appel en INDIRECT également.

La question est simple, la réponse peut etre moins : j'ai été obligé d'utiliser la formule INDIRECT car je vais rajouter des colonnes plus tard, donc ça c pas le pb, ça a été réglé, mais maintenant, je voudrais savoir s'il existe une formule que je rajouterai à la formule indirect pour COPIER le FORMAT de cellule du tableau A. Sinon il me faudrait une macro pouvant faire la même manip. DOnc je résume, je voudrais une façon pour copier automatiquement les formats des cellules du tableau A dans des cellules spécifiques des tableaux B et C.
Je vous joins mon fichier pour exemple.


Au final, ça serait pour n'avoir plus qu'à modifier une feuille (A) et les autres se remplissent toutes seules (B et C).

Merci d'avance

AurélienRegarde la pièce jointe Bureau.zip

 

[aurelgillm]

Re : Formule/Macro copie de format de cellule

une précision : je ne sais pas si j'ai été assez clair, c'est juste une formule qui serait rajouter à ma formule indirecte pour que la cellule visée par indirecte COPIE AUSSI LE FORMAT.

ex : j'ai un cellule qui demande en INDIRECT la cellule X1, ça copie bien automatiquement la valeur, mais pas automatiquement le format (car je peux avoir des >, < , et plus ou moins de virgules)

Merci d'avance

 

[aurelgillm]

Re : Formule/Macro copie de format de cellule

ah mince, tjs pas une réponse...

Bon ben je vais continuer à faire comme d'habitude, du copier coller case par case. 2 jours de perdus c quoi dans une vie?

Merci tout de même à ceux qui ont réfléchi sur ma demande.

 

[vbacrumble]

Re : Formule/Macro copie de format de cellule

Bonjour


Pour info:
Une formule renvoie une valeur jamais un format.


Pour avoir la valeur et le format, il faut passer par une macro.

Sub copies()
Dim s As Worksheet, Dest As Range
Set s = Sheets("BASSIN POMPIER RECAP DEP 2004")
Set Dest = Sheets("BASSIN POMPIER EVO 1 AN").Range("C2")
s.Range([D1], [D6556].End(xlUp)).Copy Dest
End Sub