Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Fractionne une tâche en deux portions.
Syntaxe
expression. Fractionner (StartSplitOn, EndSplitOn)
expression Variable qui représente un objet Tâche .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| StartSplitOn | Obligatoire | Variant | Date de début du fractionnement de la tâche. Si aucune heure n’est indiquée, l’heure de fin par défaut du projet pour la période ouvrée est utilisée. |
| EndSplitOn | Obligatoire | Variant | Date de fin du fractionnement de la tâche. Si aucune heure n’est indiquée, l’heure de début par défaut du projet pour la période ouvrée est utilisée. Si EndSplitOn est antérieur ou égal à la date spécifiée avec StartSplitOn, le fractionnement n’est pas créé. |
Exemple
L’exemple suivant montre comment créer un fractionnement de la tâche spécifiée.
Sub CreateSplit()
Dim WhichTask As Long
Dim SplitFrom As Variant, SplitTo As Variant
WhichTask = InputBox("Enter the ID of the task you would like to split:")
SplitFrom = InputBox("Enter the date and time for the start of the" & _
" split: " & vbCrLf & vbCrLf & "(The default time is the end" & _
" time of the preceding working period.)")
SplitTo = InputBox("Enter the date and time for the end of the split:" & _
vbCrLf & vbCrLf & "(The default time is the start time of the next" & _
" working period.)")
ActiveProject.Tasks(WhichTask).Split SplitFrom, SplitTo
End Sub
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.