relie fichier excel par outlook

  • Initiateur de la discussion Initiateur de la discussion asmar
  • 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 !

A

asmar

Guest
Bonjour... 🙂

est ce que je peut lier une fichier excel par Outlook ou un email quelconque..par exemple : si "la valeur < 1000 " il envoi automatiquement un message vers mon adresse email....
 
Re : relie fichier excel par outlook

Re,

Voici ton fichier modifié avec cette macro
VB:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim oMail As Object, oApp As Object
If Target.Address = "$I$6" Then
Set oApp = CreateObject("Outlook.Application")
Set oMail = oApp.CreateItem(0)
On Error Resume Next
  With oMail
      .To = "xxxxx@gmail.com"
      .CC = ""
      .BCC = ""
      .Subject = "Ton objet"
      .Body = "Ton texte"
      .Display 'pour visualiser avant envoi
      '.Send 'pour envoyer directement
    End With
On Error GoTo 0
End If
End Sub

A+

Martial
 

Pièces jointes

Re : relie fichier excel par outlook

Bonjour asmar, le forum,

La macro se trouve dans VBE (Visual Basic Editor) pour y accéder faire Alt + F11, dans la feuille à droite tu as la macro.
Cette macro se déclenche à chaque changement dans ton onglet, si la cellule modifiée est I6 alors ça, envoie le mail.

A+

Martial
 
Re : relie fichier excel par outlook

est ce que je peux envoyer ce mail avec une adresse Electronique(gmail..yahoo..) non pas avec Outlook...
aussi je veux que le mail sera envoyer a chaque valeur de cellule I6 <1000......comment j'inserrer cette condition...et désolé pour le dérangement...
 
Re : relie fichier excel par outlook

Re,

Dans la macro indiquée ci-dessus, le mail est envoyé avec l'adresse par défaut dans Outlook.
Si tu as rapatrié plusieurs comptes dans Outlook, il est aussi possible d'envoyer le mail avec ces adresses là.
Pour la condition (donnée que j'avais zappée !!!) il suffit de remplacer
If Target.Address = "$I$6" Then
par
If Target.Address = "$I$6" And Target < 1000 Then

A+

Martial
 
Re : relie fichier excel par outlook

je passer toute la journée de travailler sur une fichier excel..mais le programme ce ferme et je pas faire l'enregistrement de fichier....comment je faire pour le récupérer???svp aidez-moi c urgent...
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Formule Outlook,
Réponses
8
Affichages
314
  • Question Question
Microsoft 365 Code VBA
Réponses
7
Affichages
985
Retour