' Ajout des données des vacances scolaires
    Dim data As Variant
    data = Array(Array("2024-2025", "A", "Toussaint", "19/10/2024", "04/11/2024"), _
        Array("2024-2025", "B", "Toussaint", "19/10/2024", "04/11/2024"), _
        Array("2024-2025", "C", "Toussaint", "19/10/2024", "04/11/2024"), _
        Array("2024-2025", "A", "Noël", "21/12/2024", "08/01/2025"), _
        Array("2024-2025", "B", "Noël", "21/12/2024", "08/01/2025"), _
        Array("2024-2025", "C", "Noël", "21/12/2024", "08/01/2025"), _
        Array("2024-2025", "A", "Hiver", "10/02/2025", "24/02/2025"), _
        Array("2024-2025", "B", "Hiver", "24/02/2025", "10/03/2025"), _
        Array("2024-2025", "C", "Hiver", "17/02/2025", "03/03/2025"), _
        Array("2024-2025", "A", "Printemps", "05/04/2025", "21/04/2025"), _
        Array("2024-2025", "B", "Printemps", "19/04/2025", "05/05/2025"), _
        Array("2024-2025", "C", "Printemps", "12/04/2025", "28/04/2025"), _
        Array("2024-2025", "A", "Été", "05/07/2025", "02/09/2025"), _
        Array("2024-2025", "B", "Été", "05/07/2025", "02/09/2025"), _
        Array("2024-2025", "C", "Été", "05/07/2025", "02/09/2025"))