Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Masquer Protéger pour envoi

  • Initiateur de la discussion Initiateur de la discussion samixite
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

samixite

XLDnaute Nouveau
Bonjour à tous,

J'ai un classeur contenant 3 feuilles. J'aimerais trouver une macro qui automatise l'envoi du classeur par mail tout en ayant au préalable masquer la feuille 3 et protéger le classeur en écriture avec un mot de passe prédeterminé. C'est à dire que le mot de passe ne soit pas demandé
J'ai tenté en enregistrement de macro mais ça n'a pas été concluant

Merci d'avance pour votre aide 😉
 
Bonsoir Samixite

Voici ce que je te propose.

Cela devrait fonctionner avec le MS outlook de la suite office (qui n'est pas installer su mon poste donc pas tester)

Ne pas confondre Outlook et outlook express

Derniere chose le MDP est ' test '. [file name=Classeur2_20060530005425.zip size=9653]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur2_20060530005425.zip[/file]

Message édité par: XanorK, à: 30/05/2006 00:54
 

Pièces jointes

Bonjour le forum.

Xanork, tu indiques qu'il ne faut pas confondre Outlook et outlook express.

Si je comprends outlook fait parti de la suite MS office.
Moi j'ai outlook express et j'avais essayé d'utiliser des macros mais sans succès. Ces codes devaient être dédiés pour outlook MS (c'est ce que je comprends maintenant, dis moi si c'est vrai).

A ta connaissance existe-t-il des codes qui fonctionnent pour outlook express?
 
Salut XanorK,

Tout d'abord merci pour ton aide
Je n'ai pas du être très clair dans ma demande
Et en fin de compte je voudrais faire différemment
Je voudrais que lors de l'envoi ce soit juste la feuill 1 qui parte ( plus de protection nécessaire )
Par contre je ne souhaite pas spécifier le logiciel de messagerie j'utilise :
Application.Dialogs(xlDialogSendMail).Show
qui me permet d'utiliser mon logiciel de messagerie par défaut ( en l'occurence Lotus 🙁 )

Encore merci pour ton aide
 
samixite écrit:
... j'utilise :
Application.Dialogs(xlDialogSendMail).Show
qui me permet d'utiliser mon logiciel de messagerie par défaut ( en l'occurence Lotus 🙁 )

Voila qui repond a Coco_Lapin


sinon pourquoi ne pas supprimer les feuilles inutiles :
Code:
    Application.DisplayAlerts = False
    Sheets('Feuil2').Delete
    Sheets('Feuil3').Delete
    Application.DisplayAlerts = True
à la place de
Code:
    Sheets('Feuil3').Select
    ActiveWindow.SelectedSheets.Visible = False
    Sheets('Feuil1').Select

??

Message édité par: XanorK, à: 30/05/2006 18:03
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
17
Affichages
884
Réponses
2
Affichages
643
Réponses
3
Affichages
655
S
Réponses
6
Affichages
2 K
soNZOOO
S
L
Réponses
1
Affichages
1 K
Réponses
0
Affichages
544
A
Réponses
3
Affichages
1 K
A
Réponses
19
Affichages
2 K
A
Réponses
11
Affichages
1 K
Alain3038
A
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…