bonjour
 
j'ai une feuille pleine de formules et je veux m'en servir pour plusieurs classeurs excel.
 
qd je colle les cellules de cette feuille sur l'un deux, il copie non seulement la formule mais aussi le chemin du fichier, je veux juste copier la formule
 
comment faire ?

JSalut peanutz,
 
Je comprends pas bien, quand je fais ce genre de copier coller, ça ne me récupère aucune données sur la feuille ou le fichier. (formules simples)
Pourrais tu nous donner un exempe de ces formules. On y verra peut être plus clair
 
@+

bah c bon, je me suis débrouillée autrement...
 
regarde !
 
    Sheets.Add After:=Sheets(Worksheets.Count)
    ActiveSheet.Name = ("résumé" )
    Range("a3" ).Select
    ActiveCell.FormulaR1C1 = "Groupes" 'titre groupes
    'debut tableau groupes
    Range("B3" ).Select
    ActiveCell.FormulaR1C1 = "=SUM('100 groupes'!R2C19:R101C19)"
    Range("c3" ).Select
    ActiveCell.FormulaR1C1 = "CA total"
    Range("B4" ).Select
    ActiveCell.FormulaR1C1 = "=SUM('100 groupes'!R2C33:R101C33)"
    Range("C4" ).Select
    ActiveCell.FormulaR1C1 = "effectifs locaux"
    Range("B5" ).Select
    ActiveCell.FormulaR1C1 = "=SUM('100 groupes'!R2C23:R101C23)"
    Range("C5" ).Select
    ActiveCell.FormulaR1C1 = "export"
    Range("B6" ).Select
    ActiveCell.FormulaR1C1 = "=SUM('100 groupes'!R2C29:R101C29)"
    Range("E5" ).Select
    ActiveCell.FormulaR1C1 = "groupes"
    Range("D5" ).Select
    ActiveCell.FormulaR1C1 = "=100-(COUNTBLANK('100 groupes'!R2C23:R101C23))"
    Range("C6" ).Select
    ActiveCell.FormulaR1C1 = "effectifs totaux"
    Range("D6" ).Select
    ActiveCell.FormulaR1C1 = "=COUNTBLANK('100 groupes'!R2C29:R101C29)"
    Range("E6" ).Select
    ActiveCell.FormulaR1C1 = "cellule(s) vide(s)"