Bonjour,

J'aimerais après avoir copier mes cellules insérer des formules dans la cells(d,4) et (d,5) mais ca j'ai jamais fait et ca bug...

Comme j'utilise une variable J j'aimerais insérer cette variable dans ma formule pour qu'elle s'adapte automatiquement...

mon code pour ça :


Code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Workbooks("PRICE CHECK - WI.xls").Activate
    Sheets("TECH").Cells(d, 4).Formula = "=IF(B&d=0,"",SUMIF(ANAGRAFICHE!$B$2:$B$1100,B&d,ANAGRAFICHE!$C$2:$C$1100))"
 
'et 
 
Workbooks("PRICE CHECK - WI.xls").Activate
    Sheets("TECH").Cells(d, 4).Formula = "=IF(B&d=0,"",SUMIF(ANAGRAFICHE!$B$2:$B$1100,B&d,ANAGRAFICHE!$C$2:$C$1100))"
 
    Workbooks("PRICE CHECK - WI.xls").Activate
    Sheets("TECH").Cells(d, 4).Formula = "=IF(B&d=0,"",IF(D&d=C&d,"OK",(D&d-C&d)/D&d))"
Merci d'avance !