Mardi 30 Mai 2017  
Navigation
FAQ Outlook
» Foire Aux Questions «
Recherche
Téléchargements
Forums Outlook
Plan du site
Liens
Login

Les inscriptions sont fermées

Pseudo

Mot de passe

Se souvenir de moi



Mot de passe oublié ? Mot de passe oublié ?
Connexions
Bienvenue à [FAMACLUB]
le 1,414ème membre
Visiteurs en ligne : 4
Membres en ligne : 0

 zorro71 1 jour
 callaghi 9 semaines
 Alphator 18 semaines
 ande 24 semaines
 Oliv 26 semaines
 cubitus 29 semaines
 JièL 34 semaines
 angel 39 semaines
 Quartzkyte 48 semaines
 grouilau 48 semaines

Non activés :0

Nombre de visiteurs
depuis le : 12/11/2008

Aujourd'hui:2 278
En ligne :4
Max. en ligne:312
Max. / jour:66 529
Total hier:4 178
Total ce mois:112 847
Total visites:17 551 443
Moyenne/jour:5 625

Dernières 24h

























Publicité ; elle permet de financer le site
Voir le sujet
Poster sans créer un compte : Cliquez ici

FAQ Outlook » Outlook » Outlook 2010 (fermé)
Probleme boucle macro
Pseudo
Mot de passe
S'enregistrer FAQ Membres Aujourd'hui Recherche

Imprimer le sujet

Il y a 304 semaines à 19:32
Avatar du membre

Membre

Messages : 1165
Inscription : 06/01/09
Localisation: sur le net
Âge : 8 ans
Invite
Membre
  Probleme boucle macro
 
Salut la foule,

le forum VBA étant déja fermé, je prends une chance ici...

j'ai écrit le bout de code suivant dans un USF :

Télécharger la source  Code
Private Sub CommandButton2_Click()

supplier = Me.ComboBox1.Text

Dim M As MailItem

For Each M In ActiveExplorer.Selection

    If InStr(M.Subject, supplier) > 0 And Not M.IsMarkedAsTask Then M.MarkAsTask (olMarkComplete)

Next

End Sub




(en gros c'est fait pour traiter en boucle les mails sélectionnés -200 ou + - et les marquer comme "terminé" si le critère choisi correspond)

ça fonctionne parfaitement quand la sélection ne contient qu'un seul élément.

En revanche, quand la sélection est de plusieurs mails, la boucle tourne sans erreur mais ne produit aucun résultat...?!

Si qqn peut m'aider à éclaircir ce probleme, je suis preneur ;)
_________________
Bérylion

config W7 + OL2010
 

Il y a 304 semaines à 07:20
Membre

Messages : 218
Inscription : 08/06/10
Geo
Membre
RE: Probleme boucle macro
 
Bonjour Bérylion

Pas vraiment d'idée, il faudrait décomposer le code et le suivre en pas à pas.

Dans l'aide, ils n'utilisent pas le for each, c'est peut-être une indication, je recopie ici l'exemple du ActiveExplorer :
Télécharger la source  Code

Sub GetSelectedItems()
    Dim myOlExp As Outlook.Explorer
    Dim myOlSel As Outlook.Selection
    Dim MsgTxt As String
    Dim x As Integer
 
    MsgTxt = "You have selected items from: "
    Set myOlExp = Application.ActiveExplorer
    Set myOlSel = myOlExp.Selection
    For x = 1 To myOlSel.Count
        MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";"
    Next x
    MsgBox MsgTxt
End Sub



Mais pas testé non plus.
 

Aller vers le forum :
Forum powered by fusionBoard
Partager ce sujet
Ajouter aux favoris : 
URL :
BBcode :
HTML :
Cliquez ci dessus sur le lien que vous voulez copier et [Ctrl] + [C] ou cliquez sur le bouton [ C ]
Sujets similaires
Sujet Forum Réponses Dernier Post
Problème avec Gmail Outlook 2010 (fermé) 0 12/08/11 00:19
Microsoft outlook a rencontré un problème et doit etre fermé. Outlook 2010 (fermé) 1 04/08/11 18:48
macro pour nouveau modèle outlook VBA Outlook (fermé) 0 29/06/11 12:09
Probleme impression corp de texte Outlook 2007 (fermé) 6 23/06/11 11:10
Problème partage liste diffusion Divers (fermé) 1 22/06/11 22:32

aucun Crack, CrackZ, no-CD, DownloadZ, TelechargementZ, Serial, Numéro de série, N0 de série, Serialz ni Keygen pour Outlook sur ce site.

[/\] Copyright JièL / Jean-Louis Goubert © 2003-2009 [/\]