VBA enregistrer sous

fhoest

XLDnaute Accro

• 25 Mars 2010

• #2

Re : VBA enregistrer sous

bonjour
essai avec application.GetSaveAsFilename
a+

 

Vote positif 0 Vote négatif

Hulk

XLDnaute Barbatruc

• 25 Mars 2010

• #3

Re : VBA enregistrer sous

Hello,

Questions :

1) Nom c'est quoi ?
Le fichier Excel ou le dossier où tu veux sauver le fichier Excel ?

2) Nom = "Blablabla" ? ou Nom = Range("??")

 

Vote positif 0 Vote négatif

M

mc_guiloo

Guest

• 25 Mars 2010

• #4

Re : VBA enregistrer sous

Merci pour vos réponses,
Nom c 'est juste le nom de mon fichier excel, et du genre
Nom = "blabla" & Range()
Mais avec que le nom je n'ai pas de problème, c'est pour qu'il prenne aussi en compte le dossier dans lequel le fichier doit etre enregistré

PS : fhoest j'essaierai demain quand j'aurai à nouveau le fichier sous les yeux

 

Vote positif 0 Vote négatif

G

Guiv

XLDnaute Occasionnel

• 25 Mars 2010

• #5

Re : VBA enregistrer sous

Bonsoir à tous,

Et comme ça...?

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Nom As String
Nom = "Blabla" & Range("A1")
ThisWorkbook.SaveAs Filename:="C:\...[I]chemin à adapter.[/I]...\..............\" & Nom & ".xls"
End Sub

Cordialement,
Guiv

 

Vote positif 0 Vote négatif