Je voudrais supprimer des lignes entières via les réponses d'un questionnaire défini avant.
Sur un onglet a part j'ai établi le questionnaire et apporter une valeur. c'est a dire oui = 0 et non = 1
Sur un autre onglet j'ai réalisé un grand tableau ou je voudrais que des lignes entières se suppriment avec uniquement les réponses "non" issue du questionnaire, j'ai donc rajouter une colonne avec la formule suivante exemple: = questionnaire (nom de l'onglet)!"D3".
Je ne sais pas trop comment mi prendre et très novice concernant la macro.
Je vous ai joint un exemple de fichier sachant que le miens et beaucoup plus gros avec plus de 200 lignes.
Re : Supprimer des lignes entières dans Excel via un questionnaire
Bonjour allix5,
Commencez par grouper les OptionButtons 2 par 2.
Dans leur propriété LinkedCell utilisez F4 F5 G4 G5.
Le code de la 1ère feuille :
Code:
Private Sub CommandButton1_Click()
[F4:G5] = False
End Sub
Le code de la 2ème feuille :
Code:
Private Sub Worksheet_Calculate()
Rows.Hidden = False
On Error Resume Next 'si aucune valeur numérique
[A:A].SpecialCells(xlCellTypeFormulas, 1).EntireRow.Hidden = True
End Sub
Re : Supprimer des lignes entières dans Excel via un questionnaire
Merci Job75,
Cela m'aide beaucoup, mais j'ai un problème car dans mon tableau "2eme feuille" j'ai une formule avec multiplication (que je n'ai pas mis dans l'exemple), je ne pensais pas qu'il y aurait une incompatibilité, du coup ça plante le fichier.
Ci joint l'exemple du fichier modifié avec une multiplication dans le tableau.