Bonjour,
j'affecte a un bouton une macro qui sert a enregister ce fichier sous un nom différent (pour ne pas l'écraser). Ce nom différent est composé du nom d'origine auquel je rajoute +1 à une variable contenu dans une case.
C'est a dire que mon fichier se nomme Fichier 47.xls
Le nombre 47 se trouve dans mon fichier dans la cellule B13
Et lorsque que click sur le bouton je veux qu'il me fasse une sauvegarde du fichier sous Fichier 48.xls.
Voici ce que je suis arrivé a faire pôur le moment :
De cette facon, il va m'oubrir la boite de dialogue "enregister sous" avec comme nom de fichier prérempli "Fichier 47.xls 47"
Comment lui faire comprendre que je veux qu'il me fasse un enregistrer sous Fichier 48.xls (=47+1=B13+1)
De plus je souhaiterais que la boite de dialogue n'apparaisse pas mais qu'il me fasse la sauvegarde directement dans le même dossier que le fichier actif.
Merci d'avance
j'affecte a un bouton une macro qui sert a enregister ce fichier sous un nom différent (pour ne pas l'écraser). Ce nom différent est composé du nom d'origine auquel je rajoute +1 à une variable contenu dans une case.
C'est a dire que mon fichier se nomme Fichier 47.xls
Le nombre 47 se trouve dans mon fichier dans la cellule B13
Et lorsque que click sur le bouton je veux qu'il me fasse une sauvegarde du fichier sous Fichier 48.xls.
Voici ce que je suis arrivé a faire pôur le moment :
Code:
Sub EnregistrerSous()
Dim NomFichier, x As String, w As String, NomDefaut As String
NomVariable = Range("B13").Value
x = ThisWorkbook.Name
w = " " & NomVariable
NomDefaut = x & w
NomFichier = Application.GetSaveAsFilename(NomDefaut, "Microsoft Excel (*.xls), *.xls")
If NomFichier = False Then
MsgBox "Enregistrement annulé."
Else
MsgBox NomFichier
End If
End Sub
De cette facon, il va m'oubrir la boite de dialogue "enregister sous" avec comme nom de fichier prérempli "Fichier 47.xls 47"
Comment lui faire comprendre que je veux qu'il me fasse un enregistrer sous Fichier 48.xls (=47+1=B13+1)
De plus je souhaiterais que la boite de dialogue n'apparaisse pas mais qu'il me fasse la sauvegarde directement dans le même dossier que le fichier actif.
Merci d'avance
Dernière édition: