Dispatcher un fichier en plusieurs onglets en conservant les formules

Bonjour,

je souhaite dispatcher la base suivante en plusieurs fichiers.

1 fichier par code client.

je n'ai pas de souci pour faire le dispatch. Par contre, la macro que j'ai trouvé fige le calcul de la colonne K.

que faut-il faire pour que les classeurs conservent les formules de calcul?

merci d'avance pour votre aide :=)

Bonjour,

Je n'ai pas de fichiers sous les yeux donc, j'ignore comment ils sont faits mais, si les fichiers destinations comportent le même nombre de colonnes et que la première ligne (hors entêtes) commence à la ligne 2, voici ce que je ferai:

sous la ligne suivante:

wb.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Resize(UBound(result1, 1), UBound(result1, 2)) = result1

j'ajouterai:

Range(wb.Sheets(1).Cells(2, "K"), wb.Sheets(1).Cells(Rows.Count + 1, "K")).FormulaR1C1 = "=RC9*(1+RC10)"

je ne peux pas en vérifier l'exactitude mais, je ne dois pas être loin de la vérité, à ajuster si nécessaire.

Cdlt

Rechercher des sujets similaires à "dispatcher fichier onglets conservant formules"