Contenu récent par Papyty

  1. P

    Changement de couleur de fond selon deux conditions

    Raka, Effectivement j'ai raté cette consigne. Voila si tu as la possibilité d'ajouter une colonne qui peut être masquée. Bonne soirée. Papyty
  2. P

    Changement de couleur de fond selon deux conditions

    Bonsoir Raka, Si j'ai bien compris l’énoncé, tu ne dois pas faire de mise en forme de la cellule A2. Ensuite tu fais une mise en forme conditionnelle sur A2 avec fond vert avec la formule =La cellule qui est liée à la case à cocher. Voir fichier en pièce jointe. Bonne réception. Papyty
  3. P

    XL 2016 Macro Filtrer + Copier Coller + Enregistrer

    Bonjour sebvosl, Sub modifiée. Sub ExportClasseur() Dim Unique As Object Dim DerLigne As Integer, DerColonne As Integer Dim Plage As Range, c As Range Dim Valeur Set Plage = ThisWorkbook.Worksheets("COTATION_YES").UsedRange Set Unique =...
  4. P

    XL 2016 Macro Filtrer + Copier Coller + Enregistrer

    Bonsoir sebvosl, Sub à ingérer dans un module, voir le fichier en pièce jointe. Sub ExportClasseur() Dim Unique As Object Dim DerLigne As Integer, DerColonne As Integer Dim Plage As Range, c As Range Dim Valeur Set Plage = Feuil1.UsedRange Set Unique =...
  5. P

    Microsoft 365 Affichage case à cocher en fonction de la couleur d'une autre cellule

    Bonjour Coralie01120 Voici une possibilité à adapter à ton besoin. Private Sub Worksheet_Change(ByVal Target As Range) Dim Obj As OLEObject If Not Application.Intersect(Target, Range("D:D")) Is Nothing Then 'verifie la colonne modifiée est en D If Target > Target.Offset(0, -1)...
  6. P

    Gérer les doublons d'une Listbox par ajout Textbox

    Bonsoir Horusbk, Une des possibilités : Private Sub CommandButton1_Click() ' Test si vide If Me.TextBox1 = "" Then Me.TextBox1.SetFocus Exit Sub End If 'Test si existe On Error Resume Next Me.ListBox1 = Me.TextBox1 On Error GoTo 0 If...
  7. P

    XL 2019 Mon commentaire ne s'affiche pas avec Excel 2019

    Bonjour eriiiic, Effectivement j'était bien fatigué. :D Bonne journée Papyty
  8. P

    L'obstacle ne me fait pas plier. Tout obstacle est détruit par la rigueur. Léonard de Vinci

    L'obstacle ne me fait pas plier. Tout obstacle est détruit par la rigueur. Léonard de Vinci
  9. P

    XL 2019 Mon commentaire ne s'affiche pas avec Excel 2019

    Bonsoir marcelio, J'ai adapté une procédure de Jacques BOISGONTIER en incluant une boucle qui attend la création de l'objet. La sub fonctionne correctement chez moi. Bonne soirée Papyty
  10. P

    XL 2019 Mon commentaire ne s'affiche pas avec Excel 2019

    Bonsoir marcelio, Effectivement le commentaire reste vide. Une piste, la sub fonctionne en pas à pas. J'ai essayé d'incorporer des pauses mais sans succès. C'est tés étrange et je ne trouves pas de solutions non plus. J'ai testé sans créer de fichier Excel temporaire car ce n'est pas...
  11. P

    PAPYTY

    Bonjour à tous, Passionné par Excel et VBA je suis heureux de rejoindre ce forum pour parfaire mes compétences et partager mes expériences. Bonne soirée