Copie classeur excel choix du nom

Francois73 · 5 Juin 2013

bonjour le forum

je cherche à enregistrer une copie d'un classeur dans le meme dossier que le premier mais j'aimerais choisir son nom d'enregistrement

le code vba ci dessous ne fonctionne pas car il me demande si je veux écraser le fichier source

Sub SaveAChoisir()
ActiveWorkbook.SaveAs
Application.Dialogs(xlDialogSaveAs).Show
End Sub
l'idéal serait l'ouverture d'une box me demandant quel nom je désire pour enregistrer la copie

Francois73 · 5 Juin 2013

Re : Copie classeur excel choix du nom

zut j'ai envoyé avant la fin de mon message

qui est : merci de votre aide toujours precieuse

Pierrot93 · 5 Juin 2013

Re : Copie classeur excel choix du nom

Bonjour,

regarde peut être ceci :

Code:

Sub testt()
Dim nom As String
nom = InputBox("quel nom ?")
If nom <> "" Then
    With ThisWorkbook
        .SaveCopyAs .Path & "\" & nom & ".xlsm"
    End With
End If
End Sub

bon après midi
@+

Francois73 · 5 Juin 2013

Re : Copie classeur excel choix du nom

bonjour Pierrot

c'est exactement ce que je voulais
un trés grand merci
bon après midi

Copie classeur excel choix du nom

Francois73

XLDnaute Occasionnel

Francois73

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

Francois73

XLDnaute Occasionnel

Discussions similaires

Copie classeur excel choix du nom

Francois73

XLDnaute Occasionnel

Francois73

XLDnaute Occasionnel

Pierrot93

XLDnaute Barbatruc

Francois73

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency