XL 2010 #ref! dans formule après excution macro

MASSJIPE · 15 Septembre 2016

Bonjour
J'ai un soucis sur une formule après lancement de la macro
1) je copie toute la feuille onglet liste du classeur liste V4 aout
2) je colle les données liste du classeur liste V4 Aout dans l'onglet liste du classeur liste suivi derog orginal
3) le lance la macro Liste_Derog
4) dans l'onglet pilotage dans la cellule AF8 la formule suivante =(NB.SI(Liste!$I$9:$I$200;"<" & Liste!$E$4+31))-(NB.SI(Liste!$I$9:$I$200;"<" & Liste!$E$4))
après le lancement de la macro la formule devient ==(NB.SI(Liste!#REF!;"<" & Liste!$E$4+31))-(NB.SI(Liste!#REF!;"<" & Liste!$E$4))
Une Idée je joint les deux fichiers
Cordialement

Dranreb · 15 Septembre 2016

Bonjour
Ça vient assurément de :

' suppression ancienne colonne
Columns("I:I").Select
Selection.Delete Shift:=xlToLeft

MASSJIPE · 18 Septembre 2016

Bonjour,
J'a supprimé le ligne suivante la formule reste en place (plus de #ref!) mais la formule ne calcule pas reste à zéro
Pour contourner le problème à la fin du code j'ai ajouté ceci
Merci

VB:

  Sheets("Pilotage").Select
    Range("AJ8").Select
    ActiveCell.FormulaR1C1 = _
        "=(COUNTIF(Liste!R9C9:R200C9,""<"" &Liste!R4C5+31))-(COUNTIF(Liste!R9C9:R200C9,""<"" &Liste!R4C5))-1"

VB:

' suppression ancienne colonne
Columns("I:I").Select
Selection.Delete Shift:=xlToLeft

XL 2010 #ref! dans formule après excution macro

MASSJIPE

XLDnaute Impliqué

Pièces jointes

Dranreb

XLDnaute Barbatruc

MASSJIPE

XLDnaute Impliqué

Discussions similaires

XL 2010 #ref! dans formule après excution macro

MASSJIPE

XLDnaute Impliqué

Pièces jointes

Dranreb

XLDnaute Barbatruc

MASSJIPE

XLDnaute Impliqué

Discussions similaires

Privacy & Transparency

Privacy & Transparency