Discussion :

[DenisHen]

Bonjour à tous,

Voilà, j'ai un petit souci, je n'arrive pas à faire apparaitre la fenêtre "Enregistrer sous" avec un nom de classeur. Je créé le nom d'après deux cellules mais je n'ai pas le répertoire qui est à sélectionner dans la fenêtre SaveAs...
J'ai fais ce code mais j'aimerais que l'utilisateur puisse enregistrer ce classeur dans un autre répertoire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.ActiveSheet.SaveAs (ThisWorkbook.Path & "\" & ActiveWorkbook.ActiveSheet.Range("CommuneAffaire").Value & " " & ActiveWorkbook.ActiveSheet.Range("ZNC").Value)

Merci à tous...

Denis

[Marc-L]

Bonjour,

voir du côté de la méthode GetSaveAsFilename …


__________________________________________________________________________________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …


__________________________________________________________________________________________________
Tous unis, tous Charlie

[DenisHen]

Bonjour Marc-L,

Mille mercis, c'est exactement çà...

Merci encore,

Denis...