Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2531 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  macro excel

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

macro excel

n°2119052
pasfacile
Posté le 02-01-2012 à 17:00:38  profilanswer
 

Salut
J'ai un fichier avec plusieurs adresses mail et j'ai donc integré un code VBA pour pouvoir envoyer un mail à plusieurs destinataires avec outlook.
Mon problème est que je n'arrive pas à selectionner plusieurs cellules (par exemple: de D1 jusqu'à D300)
et dans cette plage d'ignorer les cellules vides.
D'avance merci.
Voici le code:
 
Sub EnvoiMail_Outlook()
 'Creation de l'objet e-mail
 Dim ol As New Outlook.Application
 Dim olmail As MailItem
 Dim CurrFile As String
 Set ol = New Outlook.Application
 Set olmail = ol.CreateItem(olmailItem)
 'Caractéristiques de l'e-mail
 With olmail
 .To = Range("Feuil1!A1" ).Value & ";" & Range("Feuil1!A2" ).Value
 'Affiche le nom comme objet du message
 .Subject = "Alerte de Mean"
 .Body = "je vous informe que des modifcations ont été réalisées sur cette feuille ..."
 
  'Remplacez .Display par .send pour envoyer directement l'e-mail sans l'afficher dans Outlook
 .Display
 End With
 End Sub

mood
Publicité
Posté le 02-01-2012 à 17:00:38  profilanswer
 

n°2119279
JBARBE
Posté le 03-01-2012 à 19:38:41  profilanswer
 

Bonjour,
 
Voici une petite macro ( à modifier) qui permet de sélectionner des noms dans la colonne D ( 300 noms)!
 
Sub Selection()
Dim i  As Integer
 For i = 1 To 300
  If Cells(i, 4) = "" Then
   Cells(i + 1, 4).Select
  ElseIf Cells(i, 4) <> "" Then
   MsgBox "Préparation de l'envoi des noms!"
  Else
  Cells(i + 1, 4).Select
  End If
  Next
End Sub


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  macro excel

 

Sujets relatifs
Remplir questionnaire java avec macro excelMacro excel
Macro pour copier le contenu d'un document excel vers un autreMacro excel supprimer une ligne sous conditions
comparaison et copie de cellules excel avec macroVB Macro Importer des infos de tous mes docs excel dans un doc excel
[RESOLU]Macro excel modification hypertexteOptimiser une macro de comparaison de feuilles Excel
Gestion de document Word via macro VBA excelMacro sous excel
Plus de sujets relatifs à : macro excel


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR