Supression de ligne sur Excel

SFK Messages postés 4 Statut Membre -  
wilfried_42 Messages postés 912 Statut Contributeur -
Bonjour à tous,

Je suis en train de faire une feuille de calcul sur Excel contenant une liste qui est la suivantes:
Habitation
Bureau
Restaurant
L'utilisateur doit choisir un ouvrage de la liste ci-dessus et j'aimerais supprimer certaines cellules en fonction du choix d'ouvrage réalisé. Comment faire? (Par exemple si choix =bureau alors supprimer C23:C50)
Merci d'avance!
SFK
Configuration: Windows XP
Internet Explorer 6.0

7 réponses

  1.
    tenace Messages postés 840 Statut Membre 224
     
    Bonjour
    As-tu essayé les filtres automatiques ?
    Kev
    0
  2. Raymond PENTIER Messages postés 58226 Date d'inscription   Statut Contributeur Dernière intervention   17 488
     
    Comment s'opère le choix : On tape l'intitulé dans une cellule particulière ? On utilise une liste déroulante ? On saisit une croix à côté de l'ouvrage choisi ?
    Qu'entends-tu par "supprimer C23:C50" : Effacer le contenu de ces cellules ? Supprimer les cellules (ce qui entraîne le déplacement des autres cellules placées à droite ou en dessous) ?
    Et ça nous aiderait si tu nous envoyais ton fichier ...
    0
  3. SFK Messages postés 4 Statut Membre
     
    Salut,

    En fait on choisit l'option dans un menu déroulant au début de la page et en fonction de ce choix j'aimerais qu'uniquement la partie qui concerne ce choix apparaissent.
    0
    1. Raymond PENTIER Messages postés 58226 Date d'inscription   Statut Contributeur Dernière intervention   17 488
       
      Ah ! Ce n'est plus tout-à-fait la même chose ...
      Il te reste à mettre à notre disposition (http://www.cijoint.fr/ ou https://www.cjoint.com/ ton fichier, ou au moins un extrait. On pourra essayer de te trouver une méthode de travail.
      0
  4. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    salut,
    Filtres automatiques
    0

  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. SFK Messages postés 4 Statut Membre
     
    Salut,

    J'ai donc mis le fichier"Bilan energétique d'un bâtiment12" sur le lien suivant:

    http://www.cijoint.fr/cjlink.php?file=cj200808/cijYqeB1Pu.xls

    Le choix de la cathégorie d'ouvrage se fait sur la première ligne du fichier et en fonction de ce choix j'aimerais supprimer dans la partie ventillation (En jaune) les lignes qui concerne les cathégories d'ouvrages autres que celle choisie au début.
    Merci à tous:-)
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      En macro, à affecter à un bouton de commande par exemple (mais c'est comme on veux) :

      Private Sub CommandButton1_Click()
      If ActiveSheet.Range("B1") = "Habitation" Then
      ActiveSheet.Rows("35:53").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("31:34").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      Else:
      If ActiveSheet.Range("B1") = "Bureau" Then
      ActiveSheet.Range("31:34,39:53").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("35:38").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      Else:
      If ActiveSheet.Range("B1") = "Restaurant" Then
      ActiveSheet.Range("31:38,42:53").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("39:41").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      Else:
      If ActiveSheet.Range("B1") = "Salle de spectacle" Then
      ActiveSheet.Range("31:41,45:53").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("42:44").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      Else:
      If ActiveSheet.Range("B1") = "Hôtel" Then
      ActiveSheet.Range("31:44,48:53").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("45:47").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      Else:
      If ActiveSheet.Range("B1") = "Piscine" Then
      ActiveSheet.Range("31:47").Select
      Selection.EntireRow.Hidden = True
      ActiveSheet.Range("48:53").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("B2").Select
      End If
      End If
      End If
      End If
      End If
      End If
      End Sub

      Voilà et pour réinitialiser (tout faire ré-apparaître) :

      Private Sub CommandButton2_Click()
      ActiveSheet.Rows("27:54").Select
      Selection.EntireRow.Hidden = False
      ActiveSheet.Range("A1").Select
      End Sub

      C'est tout simple mais efficace.
      0
      1. SFK Messages postés 4 Statut Membre > pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention  
         
        Merci beaucoup pour ton aide c'est super simpa je vais tester ça! Bonne journée!
        SFK
        0
  7. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Par une macro ça vous dérangerait?
    0
  8. wilfried_42 Messages postés 912 Statut Contributeur 245
     
    Bonjour

    Si tu pouvais poster un petit fichier exemple, c'est un peu vague, et te donner des lignes de code, c'est faisable mais elles ne correspondront pas à ta realité

    Ce que tu as, et le resulta que tu cherches

    @ te lire
    0

Discussions similaires

Excel : afficher toutes les lignes et colonnes masquées
livlarsen -
Mehdiiii -

27 réponses
remettre toutes les colonnes et les lignes masquées
mousaillon -
oumnas -

4 réponses