miguelangelo
XLDnaute Occasionnel
Bonsoir à tous,
plus parlant qu'un exemple y a pas, alors .
dans le fichier joint, ma reference est le lot_conges
il correspond à un ensemble de jours d'absence.
j'ai une macro qui alimente une userform
Sub validation_abs()
For Each c In Range("lot_conges") =colonne H
If c.Offset(0, -3) <> Range("mesinitiales") Then GoTo suivant (mes initiales correspond à la colonne E
If c.Offset(0, -1) = "" Then GoTo traitement
suivant:
Next c
MsgBox ("Vous n'avez pas de congés à valider.")
GoTo fin
traitement: validation = nom de USF
validation.Show
validation.demandeur = c.Offset(0, -6)
validation.absence = c.Offset(0, -4)
validation.date_absence = c.Offset(0, 5)
validation.date_fin_absence = c.Offset(0, 5)
validation.date_pose = c.Offset(0, 2)
fin:
End Sub
mon souci : je ne sais pas comment en f(x) de C qu'il me déduise la date de début et de fin de la période ?
Merci d'avance
plus parlant qu'un exemple y a pas, alors .
dans le fichier joint, ma reference est le lot_conges
il correspond à un ensemble de jours d'absence.
j'ai une macro qui alimente une userform
Sub validation_abs()
For Each c In Range("lot_conges") =colonne H
If c.Offset(0, -3) <> Range("mesinitiales") Then GoTo suivant (mes initiales correspond à la colonne E
If c.Offset(0, -1) = "" Then GoTo traitement
suivant:
Next c
MsgBox ("Vous n'avez pas de congés à valider.")
GoTo fin
traitement: validation = nom de USF
validation.Show
validation.demandeur = c.Offset(0, -6)
validation.absence = c.Offset(0, -4)
validation.date_absence = c.Offset(0, 5)
validation.date_fin_absence = c.Offset(0, 5)
validation.date_pose = c.Offset(0, 2)
fin:
End Sub
mon souci : je ne sais pas comment en f(x) de C qu'il me déduise la date de début et de fin de la période ?
Merci d'avance