Discussion :

[amirmane]

Bonjour,Je souhaite envoyer un e-mail directement aux clients pour leurs avertir l'échéance de leur assurance. J'ai crée un bouton macro,

Je ne suis pas caler en VBA, est-ce que c'est possible de configurer le mail avec Chrome ou Firefox.

Merci beaucoup

En P-J

[QuestVba]

peut-être lire ceci : https://www.developpez.net/forums/d1...a-macro-excel/

[Philippe Tulliez]

Bonjour,

J'ai crée un bouton macro

Et quel code y a-t-il derrière ce magnifique bouton ?

[amirmane]

Merci d'avoir répondu, je parle de ça.

[MarcelG]

Bonsoir et Bienvenu,

Au moins, c'est un début.
(ne le prends pas mal)

Pourquoi ne pas envisager Outlook plutôt que Chrome ou Firefox
Excel, à mon humble avis, pilote avec plus d'efficacité ce logiciel.

Beaucoup de discussions passées à ce sujet.
Et l'on peut faire beaucoup de choses
- Gestion destinataire(s)
- Pièce jointe
- Corps de Texte (copie image depuis Excel)

[amirmane]

Merci pour vos réponses comment faire alors, je ne maitrise pas bien EXCEL

[MarcelG]

Bonjour amirmane, Bonjour le Forum,

Tu peux déjà regarder les contenu retournés par ces liens

FAQ Développez Outlook depuis Excel

Envoi mail Outlook depuis Excel par VBA

Par ailleurs, suivant une autre méthodologie, je pourrais partager un développement gérant l'ouverture d'Outlook, et adressant un mail à une suite de destinataires avec pièce jointe.
Le corps de texte est constitué d'une image collée depuis un Range d'Excel.

N'hésite pas à revenir.

[mfoxy]

Bonjour,


j'avais rencontrer le même souci avec un autre membre du forum ( via outlook)

le lien de la discution : https://www.developpez.net/forums/d1...destinataires/

pourrait peut-être t'aiguiller

bàt

[amirmane]

Bonjour, merci pour vos réponses j'arrive toujours pas faire fonctionner mon bouton d'envoi mail

[Philippe Tulliez]

Bonjour,

j'arrive toujours pas faire fonctionner mon bouton d'envoi mail

Ton bouton n'est nullement en cause. Il ne sert qu'à lancer une procédure comme peut le faire une procédure événementielle ou simplement en appuyant sur les touches Alt + F8 pour sélectionner dans la liste des macros la procédure que tu peux exécuter.

Concentre toi sur ta procédure que l'on appelle communément "Macro" et ensuite il te sera toujours loisible de la raccorder à ton "bouton"

[amirmane]

Bonjour tout le monde, si je clique le bouton Envoyer mail. J'ai ce message sur le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Sub Sample()
   'Setting up the Excel variables.
   Dim olApp As Object
   Dim olMailItm As Object
   Dim iCounter As Integer
   Dim Dest As Variant
   Dim SDest As String
 
   'Create the Outlook application and the empty email.
   Set olApp = CreateObject("Outlook.Application")
   Set olMailItm = olApp.CreateItem(0)
 
   'Using the email, add multiple recipients, using a list of addresses in column A.
   With olMailItm
       SDest = ""
       For iCounter = 1 To WorksheetFunction.CountA(Columns(1))
           If SDest = "" Then
               SDest = Cells(iCounter, 1).Value
           Else
               SDest = SDest & ";" & Cells(iCounter, 1).Value
           End If
       Next iCounter
 
    'Do additional formatting on the BCC and Subject lines, add the body text from the spreadsheet, and send.
       .BCC = SDest
       .Subject = "FYI"
       .Body = ActiveSheet.TextBoxes(1).Text
       .Send
   End With
 
   'Clean up the Outlook application.
   Set olMailItm = Nothing
   Set olApp = Nothing
End Sub

[MarcelG]

Bonjour amirmane, Bonjour au Forum,

Pour plus de clarté, balise ton code (#) et indente le (retrait sur les méthodes If, For....)

Quelle ligne entraîne un bug (surlignée en jaune)?
Quel message?

[amirmane]

Bonjour, tout le monde j'ai pas réussi, du coup je suis stressé j'ai laissé tomber trop difficile pour moi. En tout cas merci pour votre aide

[MarcelG]

Bonjour amirmane,

j'ai laissé tomber trop difficile pour moi

Non.
Sans fausse modestie, et si je peux me permettre, en 2009, j'en connaissais moins que toi.
Nous sommes, pour beaucoup, passés par là.
Et il faut laisser de côté son ego. Je remercie maintenant ceux qui m'ont secoué (De mémoire Ousskelnor, Forestier, JP Check...)

Je t'ai posé une question.
Le débogueur de ton éditeur VBE a dû s'arrêter sur une ligne de code, surlignée en jaune.
Laquelle?
Un pop-up reportant un message d'erreur a dû apparaître.
Quel est ce message?
Pourrais-tu y répondre.

Par ailleurs, as-tu activé la référence Microsoft Outlook (Menu Outils\Références "Microsoft Outlook - n° de version - Object Library)?

[amirmane]

Merci Marcel G, j'ai ce message :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
 
End Sub

j'arrive pas à me connecter avec Outlook,

[Philippe Tulliez]

Bonjour,

Merci Marcel G, j'ai ce message :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub CommandButton1_Click()
 
End Sub

Désolé mais ce que tu affiches n'est pas un message. C'est la structure d'une procédure événementielle mais en l'occurrence qui ne contient aucun code.

Ce que tu as affiché en début de discussion, n'est pas non plus un message mais des lignes de code au sein d'une procédure nommée Sample

Quel est ton problème exactement ?

As-tu eu un message d'erreur, si oui quel est le numéro d'erreur, le texte affiché et surtout à qu'elle ligne s'est-il enclenché. Comme Marcel l'a indiqué lorsqu'il y a une erreur, l'éditeur affiche la ligne en la surlignant en jaune.

[mfoxy]

Question au passage

Tu nous fournis le code de ton bouton
Mais rien à l'intérieur

tu n'aurais pas simplement omis de faire appel à ta Su Sample dans le bouton ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
 
Private Sub CommandButton1_Click()
 
 Sample ' appel de la macro sur clic bouton 
 
End Sub

[amirmane]

Bonjour, Merci beaucoup, le problème je n'ai jamais code et ne parle pas anglais. Je ne sais quoi mettre pour coder

[Philippe Tulliez]

Bonjour,

le problème je n'ai jamais code et ne parle pas anglais

Il ne faut pas parler anglais pour coder du VBA si tu as une version française.

Je ne sais quoi mettre pour coder

Il n'y a pas 36 solutions
Soit tu te formes en lisant les nombreux tutoriels présents sur ce site
Soit tu prends une formation VBA (+/- 3 jours)
Soit tu fais appel à un professionnel

[MarcelG]

Bonjour amirmane, Bonjour au Forum,

Dans ce cas, mieux vaut acquérir les connaissances de base et revenir

Quelques liens uiles

VBA

Notions VBA

Tutoriels d'approfondissement

Espace Silkyroad/

Aides Microsoft sur les principaux objets

VBA Microsoft
Objet Application
Objet Workbook
Objet Worksheet
Objet Range

Je te conseillerais de placer sur ton bureau les raccourcis correspondants afin de t'y référer facilement.

En espérant que ces liens te seront utiles, et te revoir bientôt.

Bonne continuation