Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

L'utilisation de scripts VBA dans Excel ne nécessite aucune connaissance en programmation. VBA vous aide à effectuer de nombreuses tâches avancées telles que la création d'un rapport de feuille de calcul contenant toutes les informations du PC, l'envoi de courriels directement à partir d'une feuille de calcul ...

Pour envoyer des e-mails à partir de Microsoft Excel, il vous suffit de quelques scripts simples. N'ayez pas peur d'ajouter cette fonctionnalité à votre feuille de calcul si vous voulez vraiment tirer le meilleur parti du logiciel de bureau Excel.

Courriel d'Excel

Il existe de nombreuses raisons pour lesquelles vous souhaitez envoyer des e-mails directement sur Microsoft Excel. Par exemple, vos employés mettent à jour les documents et les feuilles de calcul chaque semaine et vous souhaitez recevoir des notifications par e-mail lorsque cette action est terminée ou parfois, vous souhaitez envoyer par e-mail tous les contacts du même classeur. à ...

Vous devez avoir pensé à utiliser un script de messagerie Excel compliqué, mais c'est en fait très simple. Cet article vous guidera pour tirer parti d'une fonctionnalité qui est disponible depuis longtemps dans Excel VBA, appelée Collaboration Data Objects (CDO) .

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

CDO est un composant de messagerie utilisé dans Windows dès les premières versions. Il s'appelait autrefois CDONTS. Après la naissance de Windows 2000 et XP, "CDO pour Windows 2000" l'a remplacé. Ce composant est inclus dans l'installation VBA dans Microsoft Word ou Excel et peut être utilisé à tout moment.

L'utilisation de ce composant pour envoyer des courriels dans des produits Windows avec VBA est extrêmement facile. Par exemple, cet article utilise CDO dans Excel pour envoyer des e-mails contenant des résultats dans une cellule.

Étape 1: créer une macro VBA

Tout d'abord, accédez à l'onglet Développeur Excel > cliquez sur Insérer dans le panneau Contrôles , puis sélectionnez un bouton de commande.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Faites-le glisser dans cette feuille de calcul, puis créez une nouvelle macro en cliquant sur Macros dans le ruban Développeur.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Lorsque vous cliquez sur le bouton Créer , il ouvre l'éditeur VBA.

Ajoutez une référence à la bibliothèque CDO en accédant à Outils> Références dans l'éditeur.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Faites défiler la liste jusqu'à ce que vous voyez Microsoft CDO pour la bibliothèque Windows 2000 . Cochez la case et cliquez sur OK .

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Lorsque vous cliquez sur OK , notez le nom de la fonction dans laquelle le script est collé, car vous en aurez besoin ultérieurement.

Étape 2: définissez les champs CDO «De» et «À»

Pour ce faire, vous devez d'abord créer des objets liés aux e-mails et configurer tous les champs de remise des e-mails requis.

N'oubliez pas que de nombreux champs peuvent ou non, mais De et To sont obligatoires.

Dim CDO_Mail As Object
Dim CDO_Config As Object
Dim SMTP_Config As Variant
Dim strSubject As String
Dim strFrom As String
Dim strTo As String
Dim strCc As String
Dim strBcc As String
Dim strBody As String

strSubject = "Résultats de la feuille de calcul Excel"
strFrom = "[email protected]"
strTo = "[email protected]"
strCc = ""
strBcc = ""
strBody = "Les résultats totaux pour ce trimestre sont:" & Str (Sheet1 .Cellules (2, 1))

La chose intéressante est que vous pouvez créer n'importe quelle chaîne souhaitée pour personnaliser l'intégralité du message électronique et lui affecter la variable strBody.

Regrouper le contenu d'un e-mail à l'aide d'une chaîne et insérer des données à partir de n'importe quelle feuille de calcul Microsoft Excel directement dans un e-mail (comme illustré ci-dessus).

Étape 3: configurer CDO pour utiliser SMTP externe

Le morceau de code suivant est l'endroit où vous configurez CDO pour utiliser n'importe quel serveur SMTP externe pour envoyer des e-mails.

Cet exemple ne configure pas SSL via Gmail, CDO peut remplacer SSL mais il sort du cadre de cet article. Si vous devez utiliser SSL, le code avancé de Github peut vous aider.

Set CDO_Mail = CreateObject ("CDO.Message")
On Error GoTo Error_Handling

Set CDO_Config = CreateObject ("CDO.Configuration")
CDO_Config.Load -1

Définissez SMTP_Config = CDO_Config.Fields

Avec SMTP_Config
.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp. gmail.com "
.Item (" http://schemas.microsoft.com/cdo/configuration/smtpauthenticate ") = 1
.Item (" http://schemas.microsoft.com/cdo/configuration/sendusername ") =" [email protected] "
.Item (" http://schemas.microsoft.com/cdo/configuration/sendpassword ") =" password "
.Item (" http://schemas.microsoft.com/cdo/configuration/smtpserverport ") = 25
.Item (" http://schemas.microsoft.com/cdo/configuration/smtpusessl ") = True
.Update
End With

Avec CDO_Mail
Set .Configuration = CDO_Config
End With

Étape 4: configuration complète de CDO

Vous avez maintenant configuré votre serveur SMTP pour envoyer des e-mails. Il vous suffit de remplir les champs appropriés pour l' objet CDO_Mail et d'émettre la commande Send .

Voici comment procéder:

CDO_Mail.Subject = strSubject
CDO_Mail.From = strFrom
CDO_Mail.To = strTo
CDO_Mail.TextBody = strBody
CDO_Mail.CC = strCc
CDO_Mail.BCC = strBcc
CDO_Mail.Send

Error_Handling:
If Err.Description <> "" Then MsgBox Err.Description

Aucune des fenêtres contextuelles ou alertes de sécurité n'apparaît comme vous le voyez habituellement lorsque vous utilisez l'objet de messagerie Outlook.

CDO met simplement les composants de messagerie côte à côte et utilise les détails de connexion du serveur pour permettre l'envoi d'informations. C'est le moyen le plus simple de combiner des e-mails dans des scripts VBA Microsoft Word ou Excel.

Pour connecter le bouton de commande à ce script, accédez à l'éditeur de code et cliquez sur Sheet1 pour voir le code VBA de cette feuille de calcul.

Tapez le nom de la fonction où vous avez collé le script ci-dessus.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Ce sont les informations que vous recevez dans la boîte de réception.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Remarque : Si vous obtenez le message d'erreur Le transport n'a pas réussi à se connecter au serveur , assurez-vous d'avoir entré le nom d'utilisateur, le mot de passe, le serveur SMTP et le numéro de port corrects dans la ligne de code répertoriée sous Avec SMTP_Config .

Améliorez et automatisez l'ensemble du processus

L'envoi d'e-mails depuis Excel avec un seul bouton est vraiment sûr et pratique. Si vous souhaitez utiliser cette fonctionnalité souvent, vous pouvez l'automatiser.

Pour ce faire, vous devez modifier la macro. Accédez à Visual Basic Editor, copiez et collez le code entier rassemblé. Ensuite, sélectionnez ThisWorkbook dans la hiérarchie du projet .

Dans les deux champs déroulants en haut de la fenêtre de code, sélectionnez Classeur et cliquez sur Ouvrir dans le menu Méthodes . Collez le script de messagerie ci-dessus dans Private Sub Workbook_Open () . Cette action exécutera la macro chaque fois que vous ouvrirez le fichier Excel.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Ensuite, ouvrez le Planificateur de tâches . Vous utiliserez cet outil pour demander à Windows d'ouvrir automatiquement des feuilles de calcul à des intervalles spécifiés. À ce moment, votre macro sera activée et envoyée par e-mail.

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Sélectionnez Créer une tâche de base ... dans le menu Action et suivez les instructions jusqu'à atteindre l'écran Action.

Sélectionnez Démarrer un programme et cliquez sur Suivant .

Instructions pour lenvoi de-mails à partir de feuilles de calcul Excel à laide de scripts VBA

Utilisez le bouton Parcourir pour trouver l'emplacement Microsoft Excel sur l'ordinateur ou copiez et collez le chemin dans le champ Programme / script .

Entrez ensuite le chemin d'accès au document Microsoft Excel dans le champ Ajouter des arguments .

Les instructions complètes et le calendrier vous seront faits.

Vous devez tester cette fonctionnalité en planifiant l'action dans les prochaines minutes, puis en révisant la tâche après l'avoir vue fonctionner efficacement.

Remarque : vous devrez peut-être ajuster les paramètres du Centre de gestion de la confidentialité pour vous assurer que la macro s'exécute comme suit:

Ouvrez la feuille de calcul et accédez à Fichier> Options> Trust Center .

Ici, cliquez sur Paramètres du Trust Center . Sur l'écran suivant, sélectionnez Ne jamais afficher d'informations sur le contenu bloqué .

Microsoft Excel est un outil extrêmement puissant, mais apprendre à l'utiliser peut parfois être difficile pour beaucoup. Si vous voulez maîtriser ce logiciel, vous devez savoir comment utiliser VBA. Ce n'est pas facile.

Cependant, avec un peu d'expérience VBA, vous pouvez automatiser les tâches de base sur Microsoft Excel et consacrer plus de temps aux tâches plus importantes.

J'espère que l'article vous sera utile. Je vous souhaite du succès!

Leave a Comment

Healthy snacks that help you lose weight

Healthy snacks that help you lose weight

Craving for snacks but afraid of gaining weight? Dont worry, lets explore together many types of weight loss snacks that are high in fiber, low in calories without making you try to starve yourself.

Résolution des problèmes liés aux paramètres de proxy de Microsoft Teams

Résolution des problèmes liés aux paramètres de proxy de Microsoft Teams

Vous rencontrez des problèmes avec le proxy dans Microsoft Teams ? Découvrez des solutions éprouvées pour résoudre ces erreurs. Videz le cache, ajustez les paramètres du proxy et retrouvez des appels fluides en quelques minutes grâce à notre guide expert.

Pourquoi mon enregistrement Microsoft Teams a-t-il échoué ? Raisons courantes

Pourquoi mon enregistrement Microsoft Teams a-t-il échoué ? Raisons courantes

Vous êtes frustré(e) car votre enregistrement Microsoft Teams a échoué ? Découvrez les principales causes, telles que les problèmes d’autorisation, les limites de stockage et les dysfonctionnements du réseau, ainsi que des solutions étape par étape pour éviter les échecs futurs et enregistrer parfaitement à chaque fois.

Pourquoi ne puis-je pas voir les salles de sous-groupes dans ma réunion Teams ?

Pourquoi ne puis-je pas voir les salles de sous-groupes dans ma réunion Teams ?

Vous êtes frustré(e) car les salles de sous-groupes sont introuvables dans vos réunions Teams ? Découvrez les principales raisons de leur absence et suivez nos solutions pas à pas pour les activer en quelques minutes. Idéal pour les organisateurs comme pour les participants !

Résolution des problèmes liés au trousseau derreurs de Microsoft Teams sur Mac

Résolution des problèmes liés au trousseau derreurs de Microsoft Teams sur Mac

Vous rencontrez des problèmes avec le Trousseau d'accès Microsoft Teams sur Mac ? Découvrez des solutions de dépannage éprouvées et détaillées pour macOS afin de retrouver une collaboration fluide. Des solutions rapides à l'intérieur !

Où se trouvent les clés de registre de Microsoft Teams sous Windows 11 ?

Où se trouvent les clés de registre de Microsoft Teams sous Windows 11 ?

Découvrez l'emplacement précis des clés de registre Microsoft Teams sous Windows 11. Ce guide pas à pas vous explique comment les trouver, y accéder et les modifier en toute sécurité pour optimiser les performances et résoudre les problèmes. Indispensable pour les professionnels de l'informatique et les utilisateurs de Teams.

Comment résoudre lerreur 1200 de Microsoft Teams sur téléphone (iOS/Android)

Comment résoudre lerreur 1200 de Microsoft Teams sur téléphone (iOS/Android)

Vous en avez assez de l'erreur 1200 de Microsoft Teams qui interrompt vos appels téléphoniques ? Découvrez des solutions rapides et simples pour iOS et Android afin de reprendre rapidement une collaboration fluide, sans aucune compétence technique requise !

Où se trouve Microsoft Teams dans Outlook ? Localisation de l’icône manquante

Où se trouve Microsoft Teams dans Outlook ? Localisation de l’icône manquante

Vous êtes frustré(e) par la disparition de l'icône Microsoft Teams dans Outlook ? Découvrez où la trouver, pourquoi elle disparaît et comment la faire réapparaître pour des réunions sans souci. Mise à jour pour les dernières versions !

Comment résoudre lerreur « Longlet Wiki de Microsoft Teams ne se charge pas »

Comment résoudre lerreur « Longlet Wiki de Microsoft Teams ne se charge pas »

Vous rencontrez des difficultés avec le chargement des onglets Wiki dans Microsoft Teams ? Découvrez des solutions éprouvées, étape par étape, pour résoudre rapidement le problème, restaurer vos onglets Wiki et optimiser la productivité de votre équipe en toute simplicité.

Comment résoudre lerreur matérielle de Microsoft Teams (correction du registre 2026)

Comment résoudre lerreur matérielle de Microsoft Teams (correction du registre 2026)

Vous en avez assez des plantages de Microsoft Teams avec erreur critique ? Découvrez la solution éprouvée de 2026 modifications du registre qui résout le problème en quelques minutes. Guide pas à pas, captures d'écran et astuces pour une solution définitive. Compatible avec les dernières versions !

Comment rejoindre une réunion Microsoft Teams avec un identifiant et un code daccès

Comment rejoindre une réunion Microsoft Teams avec un identifiant et un code daccès

Rejoignez facilement une réunion Microsoft Teams grâce à votre identifiant et votre code d'accès, que ce soit sur ordinateur, mobile ou navigateur web. Suivez les instructions étape par étape avec des captures d'écran pour un accès rapide : aucune invitation n'est requise !

Comment vider le cache de Microsoft Teams pour résoudre les problèmes de performances

Comment vider le cache de Microsoft Teams pour résoudre les problèmes de performances

Vous rencontrez des problèmes de lenteur avec Microsoft Teams ? Découvrez comment vider le cache de Microsoft Teams étape par étape pour résoudre les problèmes de performance, les ralentissements et les plantages, et améliorer la vitesse sur Windows, Mac, le Web et les appareils mobiles. Des solutions rapides et efficaces !

Résolution des erreurs réseau de Microsoft Teams sur un réseau Wi-Fi public

Résolution des erreurs réseau de Microsoft Teams sur un réseau Wi-Fi public

Vous rencontrez des problèmes de réseau avec Microsoft Teams sur un réseau Wi-Fi public ? Trouvez des solutions instantanées : optimisation du VPN, vérification des ports et vidage du cache pour rétablir vos appels et réunions sans interruption. Guide pas à pas pour une résolution rapide.

Où trouver le code QR Microsoft Teams pour une connexion mobile rapide ?

Où trouver le code QR Microsoft Teams pour une connexion mobile rapide ?

Découvrez où trouver le code QR Microsoft Teams pour une connexion mobile ultra-rapide. Un guide pas à pas illustré vous permettra de vous connecter en quelques secondes, sans mot de passe !

Comment résoudre les problèmes de son étouffé ou absent du microphone dans Microsoft Teams

Comment résoudre les problèmes de son étouffé ou absent du microphone dans Microsoft Teams

Vous en avez assez d'un son étouffé ou inexistant avec votre micro dans Microsoft Teams ? Découvrez comment résoudre les problèmes de micro de Microsoft Teams en quelques étapes simples et éprouvées. Un son clair vous attend !