Discussion :

[hiline6]

J’utilise dans toutes mes macros un chemin de répertoire de fichier pour sauvegarder mon fichier ou un nom de classeur Excel (nom_fichier.xls)
J aimerais déclarer ces variables au cas où je changerais le chemin de sauvegarde de mon fichier Excel, il suffirait que je le change une seule fois
J ai essayé de le déclarer au niveau des déclarations mais ça ne les reconnaît pas
Je dois sûrement mal m y prendre
Merci beaucoup pour votre aide

[helios77]

Bonjour
Normalement, il te suffit de faire ceci en haut de ton module en dehors de toute class

Code :

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

Const TaVariableAs String = "TonChemin"

[hiline6]

Ca ne marche pas qd je fais

Code :

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

Const nom_fichier as string = « Remarque_peugeot »

Code de base :

Code :

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

1
2
3
4
5
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
    "[remarque_peugeot.xls]remarque_peugeot!Donnees"
 
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
    "[remarque_peugeot.xls]nom_fichier!Donnees"

ca me met une erreur qui dit qu il ne peut pas ouvrir le fichier [Remarque_peugeot.xls]nom_fichier alors que la syntaxe précèdente marchait très bien

[Invité]

Re

tu remplaces tu texte par une variable, il faut faire une concaténation essaye

Code :

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

1
2
3
 
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"[remarque_peugeot.xls]" & nom_fichier & "!Donnees"

Starec

[helios77]

Deja faut concaténer correctement
Ensuite, faut faireattention à la casse
Tu déclares ta variabel avec une majuscule et tu l'utilsies avec une minsucule ==> il triouve pas ta feuille

Ce que tu déclares est une feuille visiblement, pas un fichier

[hiline6]

Code :

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

1
2
Workbooks("MAQUETA_DIA_FORDU.xls").PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
    "[DATOS_DIA_FORDU.xls]DATOS_DIA_FORDU!Donnees").CreatePivotTable TableDestination:="MAQUETA_DIA_FORDU!R1C1", _

et si je veux mettre en variable constante
1. DATOS_DIA_FORDU.xls =var1
2. DATOS_DIA_FORDU =var2
3. MAQUETA_DIA_FORDU =var 3

que cela donne t’il en variable concaténée

Suis un peu nulle merci pour votre aide

[helios77]

Pourquoi avoir 2 variables pour le nom de fichier et le nom de la feuille alor s que le nom est la meme avec l'extension en moins

Code :

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

1
2
3
4
var1 = DATOS_DIA_FORDU
var2 = MAQUETA_DIA_FORDU
 
Workbooks(var1 & ".xls").PivotCaches.Add(SourceType:=xlDatabase, SourceData:= "[" & var1 & ".xls]" & var1 & "!Donnees").CreatePivotTable TableDestination:=var2 & "!R1C1", _