Garder le format d'une cellule lors d'une bascule en VBA

Bonjour,

En période de test je suis à corriger les détails les uns après les autres.

Pour enregistrer une base de données, je part de l'onglet "Transfert de Données" pour basculer dans "Tableau des Données". Je souhaiterais que le "Tableau des Données" garde la forme de la cellule de départ, notamment monétaire.

Ci-joint le fichier en objet

Oups...........

J'avais oublié le ficher "En Objet"

Bonjour,

Le plus simple est de définir en fin de code le format que tu veux comme ceci par exemple :

Worksheets("Tableau des Données").Range("G:G").NumberFormat = "[$$-409]#,##0.00"

Hi,

Ok, mais mais ma difficulté est que je peux avoir moult format, cela voudrait dire que je dois reprendre l'opération et par rapport à un "SI"

N'y a t'il pas de solution pour un copier coller de la forme .

Bonjour,

fais un double coller, pour la valeur puis pour la forme

    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False

Ok

Je test et reviens vers toi

Testé avec succès

Encore merci...... Je continue mes ajustement......