Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Boite de dialogue de sauvegarde

Boite de dialogue de sauvegarde

3 réponses
Avatar
olitoto
Bonjour à tous

J'ai une instruction qui crée et sauvegarde un fichier CSV dans le dossier
courant, la voici

ActiveWorkbook.SaveAs Filename:= _
"F_eleves.csv", _
FileFormat:=xlCSV, CreateBackup:=False


Je voudrais permettre à mon utilisateur de choisir son emplacement de
sauvegarde (lecteur , dossier, sous-dossier, etc.)
Je ne sais pas appeller la boite de dialogue qui le permet .

Merci d'avance .

Olivier
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel
Bonjour.

With Application.FileDialog(msoFileDialogFolderPicker)
.Show
MsgBox .SelectedItems(1)
End With

Cordialement.
Daniel
"olitoto" a écrit dans le message de news:
e%
Bonjour à tous

J'ai une instruction qui crée et sauvegarde un fichier CSV dans le dossier
courant, la voici

ActiveWorkbook.SaveAs Filename:= _
"F_eleves.csv", _
FileFormat:=xlCSV, CreateBackup:úlse


Je voudrais permettre à mon utilisateur de choisir son emplacement de
sauvegarde (lecteur , dossier, sous-dossier, etc.)
Je ne sais pas appeller la boite de dialogue qui le permet .

Merci d'avance .

Olivier



Avatar
olitoto
Meric beaucoup, mais je voudrais aussi afficher une confirmation de
sauvegarde ( avec le chemin) d'une part,
et d'autre part, la boite de dialogue demande en bas un nom de répertoire,
alors qu'on le choisi avec la souris.

Olivier


f
"Daniel" a écrit dans le message de news:
%
Bonjour.

With Application.FileDialog(msoFileDialogFolderPicker)
.Show
MsgBox .SelectedItems(1)
End With

Cordialement.
Daniel
"olitoto" a écrit dans le message de news:
e%
Bonjour à tous

J'ai une instruction qui crée et sauvegarde un fichier CSV dans le
dossier courant, la voici

ActiveWorkbook.SaveAs Filename:= _
"F_eleves.csv", _
FileFormat:=xlCSV, CreateBackup:úlse


Je voudrais permettre à mon utilisateur de choisir son emplacement de
sauvegarde (lecteur , dossier, sous-dossier, etc.)
Je ne sais pas appeller la boite de dialogue qui le permet .

Merci d'avance .

Olivier







Avatar
Daniel
et d'autre part, la boite de dialogue demande en bas un nom de répertoire,
alors qu'on le choisi avec la souris.

Pas sûr de bien comprendre. Tu cliques sur le répertoire que tu choisis ou

tu écris le nom "en bas" de la boîte de dialogue.

Sub test()
With Application.FileDialog(msoFileDialogFolderPicker)
.Show
rep = MsgBox("D'accord pour sauvegarder le fichier F_eleves.csv dans le
dossier ?" _
& .SelectedItems(1), 1)
If rep = 1 Then
ActiveWorkbook.SaveAs Filename:= _
.SelectedItems(1) & "F_eleves.csv", _
FileFormat:=xlCSV, CreateBackup:úlse
End If
End With
End Sub

Daniel