prob vba

prob vba - VB/VBA/VBS - Programmation

Marsh Posté le 23-05-2006 à 10:26:48    

bonjour
voila mon probleme je souhaite créer une macro qui me permet d'envoyer une page d'un classeur excel par mail (en lançant outlook) juste en cliquant sur un bouton de commande.
le probleme c'est que je n'y connais pas grand chose en vb
help me!!!!!

Reply

Marsh Posté le 23-05-2006 à 10:26:48   

Reply

Marsh Posté le 23-05-2006 à 10:47:34    


 
 
Sub SendMail_Outlook ()  
'Avant de lancer cette macro, Dans l'éditeur VBA:  
'Faire Menu / Tools / Reference / Cocher "Microsoft Outlook Library"  
 
   Dim ol As New Outlook.Application  
   Dim olmail As MailItem  
   Dim CurrFile As String  
 
   Set ol = New Outlook.Application  
   Set olmail = ol.CreateItem(olMailItem)  
   With olmail  
      .To = range("a3" ).value  
      .Subject = Range("a1" ).Value  
      .Body = "Contenu " & Range("a2" ).Value  
      .Attachments.Add "c:\data\essai.doc"  
      .Display '.Send  
 'On peut switcher entre .send et .display selon que l'on veut envoyer  
 'le mail (send) ou seulement le préparer et le vérifier(display)  
   End With  
End Sub  
   
Sub Quit_Outlook()  
'Demander à Excel de Quitter Outlook  
    Set myOlApp = CreateObject("Outlook.Application" )  
    myOlApp.Quit  
End Sub  
 
ou http://www.exceltip.com/st/Control [...] l/464.html

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed