Bonjour,
Je fais une copie de la formule contenue dans une cellule via un drag and drop du coin inférieur droit de cette cellule. Voici le code correspondant :
Tout se passe bien, sauf pour les cellules contenant une formule de la forme :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Rows(NumRow).Select Selection.Copy Selection.Insert Shift:=xlDown
(on est sur la 35ème ligne)=1,1*1,2*[Data.xls]Facteur!$X35
Dans ce cas-là, au lieu de faire la passer la formule à
quand Excel la recopie dans la cellule de la ligne 36, et on reste avec X35.=1,1*1,2*[Data.xls]Facteur!$X36
Quelqu'un saurait pourquoi? Et comment contourner le problème simplement?
Pour l'instant, je fais ceci pour corriger le problème :
Ca fonctionne, mais je me dis qu'il doit y avoir une option que j'ai oublié de spécifier et qui ferait ce qu'il faut automatiquement sans avoir à rajouter ce bout de code.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 Cells(NumRow - 1, 2).Select Application.CutCopyMode = False Selection.AutoFill Destination:=Range(Cells(NumRow - 1, 2), Cells(LastNumRow, 2)), Type:=xlFillDefault
Merci d'avance.
Partager