Envoi d'un livre ou d'une feuille par email

Si vous devez souvent envoyer certains livres ou feuilles par e-mail, vous avez dû remarquer que cette procédure ne peut pas être appelée rapidement. Si vous le faites "classiquement", alors il vous faut :

• ouvrir un programme de messagerie (par exemple, Outlook)
• créer un nouveau message
• tapez l'adresse, le sujet et le texte
• joindre un fichier au message (n'oubliez pas !)
• cliquez sur le bouton Envoyer

En fait, le courrier peut être facilement envoyé directement depuis Excel de différentes manières. Aller…

Méthode 1 : envoi intégré

Si vous avez encore le bon vieil Excel 2003, alors tout est simple. Ouvrez le livre/la feuille souhaité(e) et sélectionnez-le dans le menu Fichier – Envoyer – Message (Fichier — Envoyer à — Destinataire du courrier). Une fenêtre s'ouvrira dans laquelle vous pourrez choisir l'une des deux options d'envoi :

Dans le premier cas, le livre courant sera ajouté au message en pièce jointe, dans le second cas, le contenu de la feuille courante ira directement dans le texte du message sous forme de tableau texte (sans formules).

De plus, le menu Fichier – Soumettre (Fichier — Envoyer vers) il existe quelques options d'expédition plus exotiques :

• Message (pour examen) (Destinataire du courrier pour examen) – le classeur entier est envoyé et en même temps le suivi des modifications est activé pour lui, c'est-à-dire qu'il commence à être clairement fixé – qui, quand et dans quelles cellules a effectué quelles modifications. Vous pouvez ensuite afficher les modifications effectuées dans le menu Service – Corrections – Corrections en surbrillance (Outils - Suivi des modifications - Mettre en surbrillance les modifications) ou sur l'onglet Révision – Corrections (Révision — Suivi des modifications) Cela ressemblera à ceci:

  Les cadres colorés marquent les modifications apportées au document (chaque utilisateur a une couleur différente). Lorsque vous passez la souris, une fenêtre semblable à une note apparaît avec une description détaillée de qui, quoi et quand a changé dans cette cellule. C'est très pratique pour réviser des documents, lorsque, par exemple, vous éditez le rapport de vos subordonnés ou que le patron édite le vôtre.

• Le long de l'itinéraire (Destinataire du routage) – le message auquel votre livre sera attaché passera par une chaîne de destinataires, chacun d'entre eux le transmettant automatiquement plus loin, comme un bâton. Si vous le souhaitez, vous pouvez définir le message pour qu'il vous revienne à la fin de la chaîne. Vous pouvez activer le suivi des modifications pour voir les modifications apportées par chaque personne dans le fil de discussion.

Dans le nouvel Excel 2007/2010, la situation est légèrement différente. Dans ces versions, pour envoyer le livre par courrier, vous devez sélectionner le bouton Bureaux (Bouton Bureau) ou onglet Déposez votre dernière attestation (Déposer) et équipe Envoyer (Envoyer). Ensuite, l'utilisateur se voit proposer un ensemble d'options d'envoi :

Veuillez noter que dans les nouvelles versions, la possibilité d'envoyer une feuille séparée du classeur insérée dans le corps de la lettre a disparu - comme c'était le cas dans Excel 2003 et versions ultérieures. La seule option qui reste est d'envoyer le fichier entier. Mais il y avait une opportunité utile d'envoyer le format PDF bien connu et le format XPS moins connu (similaire au PDF, mais ne nécessite pas Acrobat Reader pour être lu - il s'ouvre directement dans Internet Explorer). La commande d'envoi d'un livre pour révision peut être retirée comme un bouton supplémentaire sur le panneau d'accès rapide via Fichier - Options - Barre d'outils d'accès rapide - Toutes les commandes - Envoyer pour révision (Fichier - Options - Barre d'outils d'accès rapide - Toutes les commandes - Envoyer pour révision).

Méthode 2. Macros simples à envoyer

L'envoi d'une macro est beaucoup plus facile. Ouverture de Visual Basic Editor via le menu Service – Macro – Éditeur Visual Basic (Outils — Macro — Éditeur Visual Basic), insérez le nouveau module dans le menu Insertion – Module et copiez-y le texte de ces deux macros :

Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Subject:="Лови файлик" End Sub Sub SendSheet() ThisWorkbook.Sheets("Лист1").Copy With ActiveWorkbook .SendMail Recipients:="[email protected]", Subject:="Attraper le fichier" .Close SaveChanges:=False End With End Sub  

Après cela, les macros copiées peuvent être exécutées dans le menu Service-Macro-Macro (Outils — Macro — Macros). Envoyer le classeur envoie l'intégralité du livre en cours à l'adresse indiquée, et EnvoyerFeuille — Sheet1 en pièce jointe.

Lorsque vous exécuterez la macro, Excel contactera Outlook, ce qui fera apparaître le message de sécurité suivant à l'écran :

Attendez que le bouton Nous résolvons devient actif et cliquez dessus pour confirmer votre soumission. Après cela, les messages générés automatiquement seront placés dans le dossier sortant et sera envoyé aux destinataires la première fois que vous démarrez Outlook ou, s'il est en cours d'exécution, immédiatement.

Méthode 3. Macro universelle

Et si vous souhaitez envoyer non pas le livre en cours, mais tout autre fichier ? Et le texte du message serait aussi sympa à mettre ! Les macros précédentes ne vous aideront pas ici, car elles sont limitées par les capacités d'Excel lui-même, mais vous pouvez créer une macro qui gérera Outlook à partir d'Excel - créez et remplissez une nouvelle fenêtre de message et envoyez-la. La macro ressemble à ceci :

Sub SendMail() Dim OutApp As Object Dim OutMail As Object Dim cell As Range Application.ScreenUpdating = False Set OutApp = CreateObject("Outlook.Application") 'démarre Outlook en mode masqué OutApp.Session.Logon On Error GoTo cleanup 'si non démarré - quitter Set OutMail = OutApp.CreateItem(0) 'créer un nouveau message On Error Resume Next 'remplir les champs de message With OutMail .To = Range("A1").Value .Subject = Range("A2"). Value .Body = Range("A3").Value .Attachments.Add Range("A4").Value 'Send peut être remplacé par Display pour afficher le message avant l'envoi .Send End With On Error GoTo 0 Set OutMail = Nothing cleanup : Set OutApp = Nothing Application.ScreenUpdating = True End Sub  

L'adresse, le sujet, le texte du message et le chemin vers le fichier joint doivent être dans les cellules A1:A4 de la feuille courante.

• Envoi groupé à partir d'Excel avec le complément PLEX
• Macros pour envoyer du courrier depuis Excel via Lotus Notes par Dennis Wallentin
• Que sont les macros, où insérer le code de macro dans Visual Basic
• Création d'e-mails avec la fonction HYPERLINK