Comment afficher les cellule cocher

Fermé
DA3542 - 24 oct. 2012 à 15:39
 DA3542 - 25 oct. 2012 à 08:25
Yop le forum



Je travaille actuellement sur un tableau excel contenant des données. L'utilisateur "coche" (inscrit "x" dans la cellule A de la ligne qu'il souhaite copier) une ou plusieurs lignes (pas de logique dans le cochage, c'est chacun choisit comme il veut), puis toutes les lignes cochées se copient dans la Feuil2 qui contient un tableau vierge au même format.
Formule théorique :
Si x (ou case cochée) la ligne se copie, et si on décoche elle s'enlève de la Feuil2.



Je vous joins mon fichier, même si mon but final est que le fichier fonctionne, je veux avant tout apprendre comment faire
http://cjoint.com/?BJypLuinCwP 



Merci d'avance et bonne journée

2 réponses

eriiic Messages postés 24569 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 28 décembre 2023 7 211
24 oct. 2012 à 16:08
Bonjour,

une proposition en vba à mettre dans le module de la feuille 'liste' :
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim c As Range, ligDest As Long, shDest As Worksheet
    If Intersect(Target, [A3:A19]) Is Nothing Then Exit Sub
    Set shDest = Worksheets("Rapport")
    ' nettoyer
    shDest.[A5:A17].ClearContents
    '
    ligDest = 5
    For Each c In [A3:A19]
        If c = "x" Then
            shDest.Cells(ligDest, 1) = c.Offset(0, 1)
            ligDest = ligDest + 1
        End If
    Next c
End Sub

exemple : https://www.cjoint.com/?BJyqfYwEqEw

Il faut accepter les macros à l'ouverture du fichier en cliquant sur la barre jaune en haut.
sur 2010 : Voir éventuellement les réglages dans 'fichier / options / centre de gestion de la confidentialité / paramètres du centre de gestion de la confidentialité / paramètres des macros' : il faut au minimum 'désactiver toutes les macros avec notification'.
Alt+F11 pour afficher l'éditeur VBE.

eric
1
Merci beaucoup Eric, ça marche très bien.
Mais je ne suis pas fane des macros donc si quelqu'un peut me faire la même chose avec des formule ce serai géniale.
si non ce n'est pas grave la solution d' Eric me va.
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
24 oct. 2012 à 16:55
Bonjour Eric

une autre facon de voir (en VBA aussi): utilisation du click droit souris et "case a cocher", plus RAZ liste.

https://www.cjoint.com/?BJyqZLmTQcY
0
ok.
Merci beaucoup, c'est bien aussi
0