Microsoft 365 Macro enregistrer sous, chemin défini dans une cellue

viten

XLDnaute Nouveau
Bonjour,

Je voudrais enregistrer mon fichier en cliquant sur un bouton avec le chemin qui est écrit dans une cellule, (exemple, mon bureau)

Avez vous un code svp

Merci
 

xUpsilon

XLDnaute Accro
Bonjour,

Le bureau est en fait un sous dossier de ton disque dur, donc pour connaitre le chemin à suivre, sans connaitre le nom de ta session ça va être compliqué.
Mais sinon quelque chose comme "C:\Utilisateurs\******\Bureau" me semble bien.
Et sinon le code pour enregistrer c'est
VB:
ThisWorkbook.SaveAs Chemin & NomDuFichier

Bonne continuation
 

Staple1600

XLDnaute Barbatruc
Bonsoir le fil

Avec Excel installé sur Windows, ce ne sera pas trop compliqué ;)
VB:
Sub Test()
Dim Mon_bureau$
Mon_bureau = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\"
MsgBox Mon_bureau
End Sub
ou encore
VB:
Sub Test_2()
Dim Mon_bureau$
Mon_bureau = Environ("USERPROFILE") & "\Desktop\"
MsgBox Mon_bureau
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 848
dernier inscrit
Djigbenou