Besoin de sortir la date entre deux dates

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
T
Trinitybarb
Membre habitué
Membre habitué
Messages : 70
Inscrit le : 4 mars 2015
Version d'Excel : 365 ProPlus

Message par Trinitybarb » 2 avril 2020, 16:38

Bonjour,

je suis à créé un fichier pour entrer les absences d'une entreprise.

J'ai ma feuille 1 où j'inscris le nom de la personne, une cellule où j'écris la date du début du congé et une deuxième cellule où j'inscris la fin du congé : Ex : F5 : 2020-06-01 à H5 : 2020-06-15

J'aimerai créé une macro qui me sortirait chaque journée sur des lignes différentes dans une feuille 2 :

Ex : A1 : 2020-06-01
A2 : 2020-06-02
A3 : 2020-06-03
etc..
A15 : 2020-06-15

Je me doute que je vais devoir travailler avec les loop mais je ne suis pas encore très à l'aise avec ceci.

Pouvez-vous m'aider ?

Un gros merci :)

Trinitybarb
Avatar du membre
M12
Passionné d'Excel
Passionné d'Excel
Messages : 3'242
Appréciations reçues : 129
Inscrit le : 3 juillet 2015
Version d'Excel : 2013

Message par M12 » 2 avril 2020, 17:06

Bonjour,
Un test
Trinitybarb.xlsm
(19.52 Kio) Téléchargé 7 fois
Merci de clôturer le fil en cliquant sur le bouton V vert du post à coté du bouton EDITER si problème résolu

Je ne répond pas au message privé
T
Trinitybarb
Membre habitué
Membre habitué
Messages : 70
Inscrit le : 4 mars 2015
Version d'Excel : 365 ProPlus

Message par Trinitybarb » 2 avril 2020, 17:16

wow ça fonctionne très bien :)

Un gros merci :) je vais pouvoir avancer dans mon projet.

Bonne journée.
Avatar du membre
M12
Passionné d'Excel
Passionné d'Excel
Messages : 3'242
Appréciations reçues : 129
Inscrit le : 3 juillet 2015
Version d'Excel : 2013

Message par M12 » 2 avril 2020, 17:16

Re,
En utilisant la boucle DO/LOOP
Sub listeDate2()
Dim i As Integer
Range("A1").Value = Range("F5").Value
i = 2
Do While Cells(i - 1, 1) <> Range("H5")
  Cells(i, 1).Value = Cells(i - 1, 1).Value + 1
  i = i + 1
Loop
End Sub
Merci de clôturer le fil en cliquant sur le bouton V vert du post à coté du bouton EDITER si problème résolu

Je ne répond pas au message privé
T
Trinitybarb
Membre habitué
Membre habitué
Messages : 70
Inscrit le : 4 mars 2015
Version d'Excel : 365 ProPlus

Message par Trinitybarb » 2 avril 2020, 17:46

une autre question,

si je voudrais qu'à côté de chaque date, il inscrit le nom de l'employé, donc répéter le nom de l'employé inscrit :

Ex : A1: 2020-06-01 : employé 1
A2 : 2020-06-02 : employé 1

etc... ???
Avatar du membre
M12
Passionné d'Excel
Passionné d'Excel
Messages : 3'242
Appréciations reçues : 129
Inscrit le : 3 juillet 2015
Version d'Excel : 2013

Message par M12 » 2 avril 2020, 18:05

Re,

A tester
Trinitybarb.xlsm
(191.17 Kio) Téléchargé 7 fois
Merci de clôturer le fil en cliquant sur le bouton V vert du post à coté du bouton EDITER si problème résolu

Je ne répond pas au message privé
T
Trinitybarb
Membre habitué
Membre habitué
Messages : 70
Inscrit le : 4 mars 2015
Version d'Excel : 365 ProPlus

Message par Trinitybarb » 2 avril 2020, 19:03

Super !!!! encore un gros merci :)
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message