Bonjour Forum,
Je cherche a créer une boucle dans le code ci-dessous.
Dans mon tableur excel j'ai 5 lignes dans lequels il peut y avoir des tâches à faire ou pas.
De la sorte, je cherche a reproduire la macro avec un "i"
for i = 1 to 5
et de changer le .cells( "i",1).Value
mais la boucle doit continuer à avancer seulement s'il y a quelque chose d'inscrit dans la cellule
merci pour votre aide
Je cherche a créer une boucle dans le code ci-dessous.
Dans mon tableur excel j'ai 5 lignes dans lequels il peut y avoir des tâches à faire ou pas.
De la sorte, je cherche a reproduire la macro avec un "i"
for i = 1 to 5
et de changer le .cells( "i",1).Value
mais la boucle doit continuer à avancer seulement s'il y a quelque chose d'inscrit dans la cellule
HTML:
Sub Send_Tache_Outlook()
Dim MyOut As New Outlook.Application
Dim MyTask As TaskItem
Set MyTask = MyOut.CreateItem(olTaskItem)
'Affectation d'un Objet Tâche à myTask
With MyTask
.Subject = Sheets("to.do").Cells(1,1).Value
.DueDate = Sheets("to.do").Cells(1,2).Value
.Body = Sheets("to.do").Cells(1,3).Value
End With
MyTask.Save
End Sub
merci pour votre aide