Bonjour,
J'ai fait une petite macro avec 2 if imbriqués dans une boucle For next. La macro fonctionne bien pour le 1er if énoncé mais s'arrête ensuite. Il doit y avoir une bête faute de syntaxe, mais je ne la vois pas....
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub PSTFiles() Dim f As MAPIFolder Dim nom As String For Each f In Session.Folders nom = f.Name If f.Name = "ArchivesAntérieures" Then RemovePST (nom) If f.Name = "archive" Then RemovePST (nom) Next f End Sub
Partager