Feuille dynamique

Bonjour,

Faisant suite aux multiples recherches sans aucun résultat, je viens vers vous afin de savoir le code qui permet de changer le contenu d'une feuille à partir d'une cellule quelconque sans naviguer sur les colonnes,

Merci d'avance

Bonjour Omarbel, bonjou le forum,

Pas très clair tout cas !... Pourrais tu nous fournir un fichier exemple avec des explications plus détaillées ?

Bonjour,

Bon je partage avec vous le fichier demandé, par ailleurs l'astuce se base sur la feuille "Timesheet Schedule" exactement au niveau du "prev,next month"

Merci d'avance,

11projet-en-cours.xlsm (210.65 Ko)

Aimable relance

Edit : Voir réponse ci-dessous

Bonjour,

Merci d'avance pour la réponse

J'aimerai bien si tu précis le code adéquat

J'aimerai bien si tu précis le code adéquat
ci-dessous code révisé et simplifié par mes soins

Sub Sched_ThisYear()
    Dim thisyear As Integer

    thisyear = Range("Years")([YearIndex])
    [MonthStart] = DateSerial(thisyear, 1, 1)
    Sched_Refresh  'Run Macro To Refresh Schedule

End Sub

Sub Sched_ThisMonth()

    [MonthStart] = DateSerial(Year([MonthStart]), Month(Date), 1)
    Sched_Refresh  'Run Macro To Refresh Schedule

End Sub

Sub Sched_PrevMonth()

    If Month([MonthStart]) > 1 Then [MonthStart] = DateAdd("M", -1, [MonthStart])

End Sub

Sub Sched_NextMonth()

    If Month([MonthStart]) < 12 Then [MonthStart] = DateAdd("M", 1, [MonthStart])

End Sub

ci-joint fichier

11projet-en-cours1.xlsm (205.04 Ko)

Bonjour,

J'aimerai bien savoir s'il y a une possibilité de continuer le déroulement des mois sans modifier la case des années, notamment,

si on est le 12/2022 et en cliquant sur le mois prochain ca va nous porter vers 01/2023,

Merci d'avance,

Bonjour,

Veuillez trouver le code adéquat

3dates.xlsm (29.12 Ko)
Rechercher des sujets similaires à "feuille dynamique"