Macro Button Userform

Bonjour à tous, après 7jours de recherche je m'en remet à votre aide.

Je souhaite simplement liée une macro (qui fonctionne parfaitement via Excel) et lorsque je souhaite les copier sur les button userform c'est le drame.

en gros j'ai c'est 2 macro:

1er bouton : sauvegarde

Sub enregistrer_classeur()

Dim chemin As String, fichier As String

chemin = ThisWorkbook.Path

fichier = chemin & "\" & Range("A64") & "_" & Range("C12") & "_" & Range("C18") & "_" & Range("G18") & ".xls"

ActiveWorkbook.SaveAs Filename:=fichier

End Sub

Et la seconde qui envoie le fichier par mail

Sub envoiClasseur()

destinataires = Array("totoro@youpi.fr")

ActiveWorkbook.SendMail Recipients:=destinataires, _

Subject:="" & ActiveWorkbook.Name, ReturnReceipt:=False

End Sub

y'a t"il une particularité sur les button user form (c'est mon premier)

Merci a vous si vous pouvez m'aider je suis désespérer

Salut Dedee,

Afin d’être utilisé au travers d’un UserForm, le code doit être déplacé dans le code de ce UserForm (et éventuellement adapté) et relié à un bouton, dans mon exemple au CommandButton1.

Est-ce que cet exemple te permet d’aller de l’avant ?

La prochaine fois pense à fournir un fichier modèle.

Cordialement.

11demo-dedee.zip (10.03 Ko)

C'est parfait un grand merci Yvouille, comme toujours c'est plus simple une fois qu'on a la solution

J'ai une question si certains d'entre vous on déjà essayé , avez vous déjà essayé e créer un userform lu et accepté avec une case cochante qui libère un autre Userform?

Je sais je part loin mais je préfère demander avant de perdre des nuits.

Si je t'ai bien compris

18demo-userforms.xlsm (18.59 Ko)

moi je dis merciiiiiiiiiiiiiii

Bonne soirée et merci encore pour ton aide

Rechercher des sujets similaires à "macro button userform"