Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Date du jour, dans boite de dialogue" enregistrer sous"

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion titoffe60
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
T

titoffe60

Guest
Bonjour tout le monde

J'ai fais une macro pour ouvrir la boite de dialogue"enregistrer sous"
et j' aimerais intégrer la date du jour sous format 2014 03 22 - planning

Pourriez vous m'aidez s il vous plais

Voici le code:

Application.Dialogs(xlDialogSaveAs).Show "Date du jour" & "- Planning"

en vous remerciant par avance
titoffe
 
Dernière modification par un modérateur:
Trier par date Trier par votes
Re : Date du jour, dans boite de dialogue" enregistrer sous"

Bonsoir,
à tester et à adapter à ta demande :
Code: 
Sub test()
Dim Chemin As String
Application.DisplayAlerts = True
Chemin = "C:\Users\xxxxx\Desktop\" 'chemin à adapter
ActiveWorkbook.SaveAs Filename:= _
Chemin & "Test - " & Format(Date, "yyyy mm dd") & " - planning", FileFormat:=xlExcel8, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
Application.DisplayAlerts = False
End Sub
A+
 
Vote positif 0 Vote négatif
Re : Date du jour, dans boite de dialogue" enregistrer sous"

Désoler mais un peut de mal a l'adapter

voici la formule complète
Pouvez vous m'aidez

'enregistrer_sous dans un nouveau classeur
Private Sub CommandButton26_Click()
Dim Rep As Integer
Rep = MsgBox("Voulez-vous sauvagarder une copie du planning?", vbYesNo + vbQuestion, "Sauvegarder une copie")
If Rep = vbYes Then

' ici le traitement si réponse positive
Sheets(Array("2014", "2015")).Copy
Me.Hide

' chemin pour l'enregistrement
ChDir "C:\Users\essai"

'Ouvrir la boite de dialogue
Application.Dialogs(xlDialogSaveAs).Show "Date" & "- Planning"
Else

End If
End Sub


Merci
 
Vote positif 0 Vote négatif
Re : Date du jour, dans boite de dialogue" enregistrer sous"

Bonjour,
quel est pour toi l'intérêt d'utiliser la boîte de dialogue Enregistrer sous ?
Application.Dialogs(xlDialogSaveAs)
Cliquez pour agrandir...
Si tu ne connais pas à l'avance le chemin où tu veux enregistrer ton fichier je comprends mais est-ce vraiment le cas ?
A+
 
Vote positif 0 Vote négatif
Re : Date du jour, dans boite de dialogue" enregistrer sous"

Bonjour

Je connais a l'avance mais ne serais pas le seul a l'utiliser cela permet de le mettre ou on veut

et j'ai trouvé la solution pour la date du jour dans boite de dialogue

Application.Dialogs(xlDialogSaveAs).Show Format(Now, "yyyy mm dd") & " - Planning "

Merci le forum excel downloads
a bientot
 
Vote positif 0 Vote négatif
Re : Date du jour, dans boite de dialogue" enregistrer sous"

Je te l'avais placé dans le code proposé mais en enregistrant directement le fichier
Code: 
Chemin & "Test - " & Format(Date, "yyyy mm dd") & " - planning"
A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

E
  • Question Question
XL 2019 Boite de dialogue Save as affiche mauvaise extension
Réponses
9
Affichages
552
patricktoulon
C
  • Question Question
Microsoft 365 délai traitement dossier en état instruction et par rapport date du jour et date de réception
Réponses
1
Affichages
634
Phil69970
C
  • Résolu(e)
Microsoft 365 Boite de dialogue suivant date et récupération de données
2
Réponses
15
Affichages
1 K
chnico80
C
Conversion entre Date Universelle GMT et Date Localisée, puis correction de date extraite du DOS
Réponses
0
Affichages
539
Lu76Fer
D
  • Résolu(e)
XL 2021 afficher prénom de la plageprénom si correspondance avec prénom à la date du jour dans plage10 (fêtes)
Réponses
5
Affichages
653
DédéW83
D
Office XLS : Fonction simplifiant l'utilisation de la fenêtre FileDialog
Réponses
6
Affichages
850
Lu76Fer
E
  • Résolu(e)
Microsoft 365 "Enregistrer sous" avec mot de passe à l'ouverture
Réponses
6
Affichages
785
etpisculrien
E
L
  • Résolu(e)
XL 2016 Enregistrer sous? Pourquoi mon code ne fonctionne pas?
Réponses
5
Affichages
952
Linda42
L
T
  • Question Question
XL 2016 copier coller les données d'une feuille vers une autre en fonction de la date du jour
Réponses
2
Affichages
761
therse
T
  • Question Question
XL pour MAC Besoin d'aide pour calculer automatiquement un jour de livraison dans Excel
Réponses
10
Affichages
1 K
ArnaudSi
S
  • Question Question
Autres Affichage alertes
2
Réponses
16
Affichages
2 K
Slavko.R
S
R
  • Question Question
XL 2016 Indiquer la date du jour dans une cellule sans effacer les précédentes
Réponses
10
Affichages
1 K
ReneDav14000
R
A
  • Question Question
XL 2013 Macro pour copier des colonne d'une feuille A dans un classeur sur une feuille B dans un autre classeur .
Réponses
7
Affichages
1 K
Hasco
M
  • Question Question
Microsoft 365 Enregistrer un nom de fichier Excel à partir d'une cellule et pouvoir "Parcourir" pour l'enregistrement
Réponses
5
Affichages
2 K
maxime.dlv
M
S
  • Question Question
XL 2016 Date qui se met a jour en fonction du pays ou l'on se trouve
Réponses
8
Affichages
1 K
Staple1600
Y
  • Question Question
XL 2016 application de valeurs prédéfinies selon planning et date démarrage conditionnelle
Réponses
2
Affichages
862
YoH2
Y
B
  • Question Question
Microsoft 365 enregistrer sous avec nom classeur suivant cellule
Réponses
3
Affichages
1 K
laurent950
E
  • Question Question
XL 2013 BOITE DE DIALOGUE POUR CHEMIN D'ACCES
Réponses
6
Affichages
1 K
ebenezerkonan
E
P
  • Question Question
XL 2010 Date du jour dans une forme....!
Réponses
6
Affichages
927
PapaYaya
P
L
  • Question Question
XL 2016 Enregistrement du nom de fichier en date du jour
Réponses
1
Affichages
955
M12
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…