Contenu récent par Eric KERGRESSE

  1. E

    XL 2021 [Résolu] : Récupérer les coordonnées d'une cellule sur une feuille créée dynamiquement

    Bonjour, Au lieu d'ajouter un nouvel onglet, vous dupliquez un onglet modèle contenant l'événement.
  2. E

    Pour me contacter : Eric KERGRESSE EIRL

    Pour me contacter : Eric KERGRESSE EIRL
  3. E

    XL 2013 copier et coller un tableau croisé dynamique

    Bonjour, A condition que l'onglet TEXTE existe : Sub Macro8() Dim Pvt As PivotTable ActiveWorkbook.RefreshAll Sheets("TEXTE").Cells.Clear Set Pvt = Sheets("TCD").PivotTables("Tableau croisé dynamique5") With Pvt .PivotSelect "TC[All]", xlLabelOnly, True...
  4. E

    XL 2021 Macro qui détecte un bouton (formulaire)

    Bonjour, Le plus simple serait de créer une macro complémentaire (.xlam) qui contiendrait votre formulaire et qui agirait sur le classeur actif. Il y a des exemples sur les forums. Si cette macro doit être utilisée sur d'autres postes, il suffit de diffuser le fichier .xlam.
  5. E

    Word Normal.dotm

    Bonjour, Vous avez sauvegardé votre Normal.dotm sous un autre nom ? Si oui, avez-vous essayé de le rouvrir une fois Word lancé ? Votre fichier se situe dans C:\Users\Votre user\AppData\Roaming\Microsoft\Templates
  6. E

    Microsoft 365 Trouver Date début et date de fin

    Bonjour, A tester
  7. E

    XL 2016 Exclure une période des calcule de jours entre 2 dates (Datedif)

    Bonjour, Si une fonction VBA est possible : Nb: Les dates de départ sont incluses dans le calcul. Function NbJours(ByVal DateDebut As Date, ByVal DateFin As Date) As Integer Dim DateEnCours As Date NbJours = 0 For DateEnCours = DateDebut To DateFin Select Case...
  8. E

    XL 2016 copie de doublons sur nouvel onglet

    Il faut mettre le code dans un module standard. Dans le fichier joint, la macro est déclenchée par le bouton vert dans la barre d'accès rapide.
  9. E

    XL 2016 copie de doublons sur nouvel onglet

    Bonjour, La forme n'est pas la même que votre tableau d'origine, mais cela me paraît suffisant. Option Explicit Sub ListerLesDoublons() Dim I As Integer, J As Integer, DerniereLigne As Integer, IndexListe As Integer Dim ListeSansDoublons As Object Dim Cellule As Range, AireCellules As...
  10. E

    Microsoft 365 Pagination multi feuilles

    Bonjour, Je vous souhaite un bon rétablissement.
  11. E

    XL 2016 Extraire plusieurs chaînes de caractères d'une même cellule

    Au cas où La macro se lance avec le bouton vert dans la barre d'accès rapide.
  12. E

    XL 2016 Extraire plusieurs chaînes de caractères d'une même cellule

    Bonjour, A tester : Sub ImportFm() With ActiveSheet ChargerLaListeDesFM .Range("A2:A800") End With End Sub Sub ChargerLaListeDesFM(ByVal AireFM As Range) Dim I As Integer, J As Integer, K As Integer Dim ListeFm As Object Dim Fm As String Dim ListeCles As Variant, TabFm As Variant...
  13. E

    Microsoft 365 Macro excel pour liste déroulante dans sujet outlook

    Bonjour, Il vous faut adapter les propriétés de la Combobox et charger les deux colonnes. Par exemple: BoundColumn reste à 1, elle correspond à la valeur que vous restituerez (BB92) ColumnCount = 2 (vos deux colonnes) ColumnWidths 0;100 avec 0 on rend invisible la première colonne.
  14. E

    XL 2021 Planning de surveillance de cours de récréation

    Bonjour, Ce que vous n'indiquez pas, c'est le taux d'absentéisme parmi les enseignants. Le problème étant souvent récurrent, vous avez peut être fait des statistiques 🤬 ... A chaque enseignant défaillant, il vous faut donc un plan B avec un suppléant dont on espère qu'il ne sera pas absent en...