XL 2010 Récupérer les informations d'un calendrier

bruno972

XLDnaute Junior
Bonjour à tous,

je voudrais pouvoir récupérer automatiquement les informations du calendrier par date sur la feuille Récap dans un tableau.

Le nom, la date et le type d'absence

Merci d'avance pour votre aide

Cordialement

Bruno
 

Pièces jointes

  • suivi congés.xlsm
    197.6 KB · Affichages: 20

bruno972

XLDnaute Junior
bonjour bruno972
je me pose une question
ce tableau n'existe t-il pas déjà dans l'onglet input ?
pourriez vous joindre un exemple du résultat souhaité.
cordialement
galougalou
Bonjour GALOUGALOU,
le modèle est sur l'onglet récap.
en effet sur l'onglet input il y a les absences mais avec une date de début et une date de fin, il me faudrait toutes les dates entre le début et la fin.

Cordialement
 

GALOUGALOU

XLDnaute Accro
bonjour bruno972 bonjour le forum
je tiens à préciser avant de commenter le classeur
je n'ai aucune formation informatique et sur excel, je suis autodidacte en la matière
tout cela pour vous mettre en garde sur le travail que j'ai effectué, bien verifier avant utilisation.

pour arriver au résultat escompté j'ai du modifier vos formule qui maintenant font apparaitre la valeur 1 pour être réutilisé sur la boucle de la macro ventil.
avec une mfc je vous propose de cacher cette valeur, à moins qu'un membre du forum plus averti que moi connaisse une formule plus pertinente.

dans la macro ventil...... la ligne qui pourrait etre améliorée.
If F1.Cells(LI, COL).Value <> 1 Then
attention,en gras des variables qui bouge au fur et à mesure que la boucle s'effectue

dans la ligne 1 masqué , une macro réecrit les dates pour être récupérées

chaque fois que vous souhaiterez consulté le tableau, appuyer sur ventilation. la macro déclenchée par le bouton ventilation réécrit les données actualisées.
cordialement
galougalou
 

Pièces jointes

  • Copie de suivi congé5.xlsm
    257 KB · Affichages: 3

GALOUGALOU

XLDnaute Accro
bonjour le forum bonjour bruno 972

trouvé c'était trop bête !!
toutes les cellules contenenant des formulles renvoie "" si pas de résultat
If F1.Cells(LI, COL).Value <> "" Then
cordialement
galougalou
 

Pièces jointes

  • Copie de Copie de suivi congé7.xlsm
    257.5 KB · Affichages: 11

Discussions similaires

Réponses
5
Affichages
258

Statistiques des forums

Discussions
311 720
Messages
2 081 926
Membres
101 842
dernier inscrit
seb0390