Supression de ligne sur Excel

SFK Messages postés 4 Statut Membre -
wilfried_42 Messages postés 912 Statut Contributeur - 21 août 2008 à 10:17

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

Afficher la suite

A voir également:

Supression de ligne sur Excel
Liste déroulante excel - Guide
Partage de photos en ligne - Guide
Formule somme excel ligne - Guide
Word et excel gratuit - Guide
Comment trier par ordre alphabétique sur excel - Guide

7 réponses

Réponse 1 / 7

tenace Messages postés 840 Statut Membre 224

Bonjour
As-tu essayé les filtres automatiques ?
Kev

Réponse 2 / 7

Raymond PENTIER Messages postés 71871 Date d'inscription Statut Contributeur Dernière intervention 17 402

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 ...

Réponse 3 / 7

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.

Raymond PENTIER Messages postés 71871 Date d'inscription Statut Contributeur Dernière intervention 17 402

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.

Réponse 4 / 7

pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention 2 769

salut,
Filtres automatiques

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

Posez votre question

Réponse 5 / 7

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:-)

pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention 2 769

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.

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

Réponse 6 / 7

pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention 2 769

Par une macro ça vous dérangerait?

Réponse 7 / 7

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

Supression de ligne sur Excel

7 réponses

Votre réponse

Newsletters