Macro pour fermer le fichier, puis le réouvrir

tototiti2008

XLDnaute Barbatruc

• 19 Août 2008

• #2

Re : Macro pour fermer le fichier, puis le réouvrir

Bonjour aurelien.francois,

cela écrase le fichier .xlt pour le remplacer définitivement.
Le souci, c'est qu'il faudrait que ce fichier se ferme, puis se réouvre (sinon la personne travaillera directement sur le .xlt)

Cliquez pour agrandir...

c'est parce que tu fais un SaveAs
as-tu essayé avec un SaveCopyAs ?

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 19 Août 2008

• #3

Re : Macro pour fermer le fichier, puis le réouvrir

Bonjour tototiti, c'est vrai que ça a l'air beaucoup plus simple comme ça.
Merci beaucoup.

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #4

Re : Macro pour fermer le fichier, puis le réouvrir

Alors en fait je pensais que ça marchait, mais ça ne marche pas...
Mon code est le suivant :

Code:

Private Sub cboui_Click()
Application.DisplayAlerts = False
chemin = ActiveWorkbook.Path
fichier = "Compte d'escale automatisé.xlt"
ActiveWorkbook.SaveCopyAs (chemin & "/" & fichier)
Application.DisplayAlerts = True
Unload Me
End Sub

Lorsque la macro se lance, il est écrit en bas d'excel "sauvegarde de fichier temporaire", le problème peut venir de là...
Ou alors cela vient du fait que c'est déjà un .xlt qu'on ouvre, et donc que le .xls qu'il lance n'est enregistré nul part.

Quelqu'un pour m'aider s'il vous plaît ?

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #5

Re : Macro pour fermer le fichier, puis le réouvrir

Personne ? Mon problème est peut-être trop compliqué ?

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #6

Re : Macro pour fermer le fichier, puis le réouvrir

Oui en fait j'ai trouvé où le fichier était enregistré : dans C:\
Ce qui veut dire qu'il me faut créer une macro qui fait que lorsque j'ouvre mon .xlt, cela ouvre le .xls dans le même dossier...
Existe-t-il une formule sous VBA ?

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 22 Août 2008

• #7

Re : Macro pour fermer le fichier, puis le réouvrir

Bonjour aurelien.francois,

euh.. une remarque : tu mets un "/" à la place d'un "\", ça pose peut-être problème
si c'est pas ça alors il faut faire comme tu avais prévu :

ActiveWorkbook.SaveAs (chemin & "\" & fichier)
ActiveWorkbook.Close False
Workbooks.Add Template:="C:\" & fichier

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #8

Re : Macro pour fermer le fichier, puis le réouvrir

Oui le sens du slash \ c'est moi qui l'ai modifié car ça ne marchait pas avec / (mais bon ça n'a rien changé)
La formule que tu me donnes c'est à mettre à la place de mon ancienne, ou alors en macro à l'ouverture du fichier ?

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 22 Août 2008

• #9

Re : Macro pour fermer le fichier, puis le réouvrir

à la place du savecopyas, à priori.

note que j'avais mis comme adresse du modèle : "C:\" & fichier,
ce serait plutôt : chemin & "\" & fichier

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #10

Re : Macro pour fermer le fichier, puis le réouvrir

J'ai utilisé le code suivant :

Code:

Private Sub cboui_Click()
Application.DisplayAlerts = False
chemin = ActiveWorkbook.Path
fichier = "Compte d'escale automatisé.xlt"
fichier1 = "Compte d'escale automatisé1.xls"
ActiveWorkbook.SaveAs (chemin & "\" & fichier1)
ActiveWorkbook.Close False
Workbooks.Add Template:=(chemin & "\" & fichier1)
Application.DisplayAlerts = True
Unload Me

End Sub

Le souci c'est qu'il le chemin (activeworkbook.path) comme étant C:\ donc il m'enregistre Compte d'escale automatisé1.xls et Compte d'escale automatisé.xlt dans C:\

Le problème me semblait simple mais finalement il est plutôt costaud !

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 22 Août 2008

• #11

Re : Macro pour fermer le fichier, puis le réouvrir

et si tu mets

chemin = Thisworkbook.Path

ça change quelque chose ?

 

Vote positif 0 Vote négatif

A

aurelien.francois

Guest

• 22 Août 2008

• #12

Re : Macro pour fermer le fichier, puis le réouvrir

Toujours pas... 🙁

 

Vote positif 0 Vote négatif