comment afficher les cellule cocher

Question

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

eriiic · Answer

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

f894009 · Answer

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

Comment afficher les cellule cocher

2 réponses

Discussions similaires

Newsletters