Bonjour,

Voilà, lorsque je lance ma macro, cela doit créer un PivotTable.
Jusque là ça va, afin de le paramétrer au mieux pour le nom de mon fichier je le stock dans une variable ici Nom, mon problème se pose lorsque mon fichier comporte plussieur avec des espaces par exemple "Resultat des ventes.xls" cela me marque l'erreur suivante :
runtime error'5':
Invalid procedure call or argument

Par contre si je l'appelle Resultatdesventes.xls en attaché cela passe tout seul.

voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Nom = ActiveWorkbook.Name
 
''''''''''''''CREATION DE LA PIVOT TABLE'''''''''''''''''''
    Workbooks(Nom).Worksheets("PivotTable").Activate
    Workbooks(Nom).Worksheets("PivotTable").Cells.Select
    Selection.Delete Shift:=xlUp
 
 
    ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
        "'GR55'!R1C1:R65000C22").CreatePivotTable TableDestination:= _
        "[" & Nom & "]PivotTable!R4C1", TableName:="PivotTable1", DefaultVersion:= _
        xlPivotTableVersion10
Merc d'avance pour vos réponses