Raccourci VBA

Bonjour,

Sur le fichier "PERMISSIONS" joint, j'ai créé une petite macro pour faire remonter en haut de la feuille "Calendrier", le mois sélectionner.

Prochainement, l'effectif du personnel, variera à la hausse comme à la baisse.

J'aimerais que la macro cible, la valeur de la cellule, à savoir le mois pour arriver au même résultat que la macro actuelle.

En vous remerciant.

J'ai trouvé une solution qui fonctionne et que j'ai adaptée par macro pour chaque mois : (J'ai utilisé l'enregistreur de macro que j'ai mixé à une macro trouvée sur le forum)

Exemple pour Mars :

Sub Mars()

Dim Ligne As Integer, Colonne As Integer

Sheets("Calendrier").Select

Cells.Find(What:="Mars", After:=ActiveCell, LookIn:=xlFormulas, _

LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _

MatchCase:=False, SearchFormat:=False).Activate

Ligne = ActiveCell.Row

Colonne = ActiveCell.Column

With ActiveWindow

.ScrollRow = Ligne - 1

.ScrollColumn = Colonne

End With

End Sub