Discussion :

[anisr]

Bonjour,
Le code ci-après permet d'ouvrir un fichier txt de l'enregistrer sous xls et d'ajouter une feuille récap.

Sur la feuille récap je veux ajouter dans la cellule A1 une somme de la 1ère feuille.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
           Classeur.SaveAs Filename:="C:\txt\Extraction\xls\" & FSO.GetBaseName(oFile.Name) & ".xls", _
            FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
            ReadOnlyRecommended:=False, CreateBackup:=False
 
 
         Set wksDest = Classeur.Worksheets.Add()
 
        wksDest.Name = "Recap"
 
           ActiveSheet.Range("A1") = "=SUM('sheets(1).Name'!C[2])"
 
 
     Classeur.Close True

Je ne comprend pas ou j'ai gaffé?

[Invité]

Re

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Range("A1").formulalocal = "=SOMME('sheets(1).Name'!C[2])"

Essaye ceci

Starec

[anisr]

Malheuresement ça ne marche pas

[Invité]

Re

enlève les '

Starec

[anisr]

Désolé ça ne marche pas encore.