S
Solcarnus
Guest
Bonjour
Je rencontre un problème avec l'une de mes macros que je n'arrive pas à contourner:
Je sauvegarde un classeur en .xls en utilisant une boite de diaogue pour demander à l'utilisateur de spécifier un nom et un chemin.
Je désire alors sauvegarder une de mes feuilles au format .csv en reprenant le nom et le chemin que l'utilisateur vient de me spécifier pour le fichier .xls
Pour cela j'utilise le code suivant:
'saving as *.xls
Application.Dialogs(xlDialogSaveAs).Show
'saving as *.csv
Sheets('transfert').Activate
ActiveWorkbook.Sheets('transfert').SaveAs FileFormat:=xlCSV
Le probleme est qu'en faisant cela excel renomme la feuille appelée transfert en lui donnant le nomde fichier que l'utilisateur a spécifié dans la boîte de dialogue.
Est-il possible d'empêcher cela?
Peut on sinon renommer la feuille en lui rendant son nom d'origine (j'ai essayé des trucs genre Sheets(Myfilename).name = 'transfert', mais cela n'a pas fonctionné)?
Merci d'avance à ceux qui prendront le temps de me répondre
Je rencontre un problème avec l'une de mes macros que je n'arrive pas à contourner:
Je sauvegarde un classeur en .xls en utilisant une boite de diaogue pour demander à l'utilisateur de spécifier un nom et un chemin.
Je désire alors sauvegarder une de mes feuilles au format .csv en reprenant le nom et le chemin que l'utilisateur vient de me spécifier pour le fichier .xls
Pour cela j'utilise le code suivant:
'saving as *.xls
Application.Dialogs(xlDialogSaveAs).Show
'saving as *.csv
Sheets('transfert').Activate
ActiveWorkbook.Sheets('transfert').SaveAs FileFormat:=xlCSV
Le probleme est qu'en faisant cela excel renomme la feuille appelée transfert en lui donnant le nomde fichier que l'utilisateur a spécifié dans la boîte de dialogue.
Est-il possible d'empêcher cela?
Peut on sinon renommer la feuille en lui rendant son nom d'origine (j'ai essayé des trucs genre Sheets(Myfilename).name = 'transfert', mais cela n'a pas fonctionné)?
Merci d'avance à ceux qui prendront le temps de me répondre