Bonsoir Didier,
Encore une fois merci pour ton aide.
J'ai ouvert le classeur, cliquer sur le bouton et malheureusement il me renvoye le message suivant:

Option Explicit

Private Sub btnPDF_Click()

'myDearFriend! - www.mdf-xlpages.com

Dim Chemin As String

'Créer le fichier PDF sur le bureau Windows avec le numéro de devis comme titre

With Sheets("Devis")

Chemin = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\Devis " & .Range("C22").Text & ".pdf"

ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin, Quality:=xlQualityStandard, _

IncludeDocProperties:=False, IgnorePrintAreas:=False, OpenAfterPublish:=False

End With

End Sub

Sinon pour moi c'est super , c'est déjà entrevoir les futurs devis plus sereinnement.
Je te renvoye le dossier Excel au cas ou.Merci encore.
Cordialement.

Sincérement, je suis en admiration par la réactivité de votre réponse, je ne l'ai pas encore essayer, mais le geste me fascine davantage.
Je vous tiens au courant et je ferais tout le nécéssaire pour faire de votre site un lieu d'excellence.
Sinon oui j'utilise Outlook comme mail.

Je vais essayer votre proposition, merci d'avance.
Cordialement.
Antonio

Bonjour,
Pour mon activitée professionnelle j'ai créer mon propre devis avec quelques interactions simples.
Je souhaiterais mettre sur ma feuille principale un bouton avec comme fonction, une fois cliquer de sauvegarder ce document ( la zone délimité, le devis) en format PDF sur mon Bureau de l'ordinateur et éventuellement, cela serait mieux de sauvegarder (en PDF) et expédier par mail.
Malgré quelques notions en Excel je suis perdu avec VBA, je sais que c'est possible, mais je sais pas comment.
Ci-joint mon devis pour analyse et compréhension.
Votre aide me serait très utile, en vous remerciant d'avance.
Cordialement
Antonio