cacher des lignes automatiquement selon des critéres
#1
Aspirant XLPages

Inscription: 05/12/2008

Messages: 36

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 28-02-2009 23h04
salut le forum ; salut tous le monde

à l'aide de ce forum et de vous les amis ; j'ai pu créer un modèle d'un avis où les impôts manquants s'affichent automatiquement dans le tableau ce qui m'a fait gagner beaucoup de temps ; alors que dans certains cas dans mon tableau certains types d'impôts sont en règle et donc c'est inutile de les afficher dans la feuille de synthèse , donc ; est ce que c'est possible de les faire cacher automatiquement ( c a d les impôts qui sont en règle pour toute la période concernée )
je vous joint un petit exemple où il existe des types d'impôts qui sont en règle et qui doivent être cacher automatiquement

merci d'avance




Pièce jointe:
zip exemple.zip   [ Taille: 46.02 Ko - Téléchargements: 803 ]
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#2
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 01-03-2009 00h08
Bonsoir inspecteur,

C'est sûrement possible avec une macro, mais je ne sais pas faire... ...,  j'ai donc essayé avec une petite formule pour voir si la ligne est vide ou pas, et un filtre automatique sur le résultat de cette formule, en espérant que cela pourra t'aider.

Bien à toi,

mth
Pièce jointe:
zip exemple.zip   [ Taille: 48.60 Ko - Téléchargements: 1434 ]
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#3
Aspirant XLPages

Inscription: 05/12/2008

Messages: 36

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 01-03-2009 01h21
salut mth , salut le forum

merci pour la rapidité de ta réponse

c'est vraiment une idée simple et intelligente qui permet de résoudre le problème

merci mth infiniment pour ton aide à réaliser ce modèle de l'avis dés le début :)

(ça sera formidable s'il existe un macro pour réaliser cet objectif )

bonne nuit

Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#4
Accro XLPages

Inscription: 23/05/2007
De Chamrousse

Messages: 309

Système d'exploitation:
PC
Version Excel utilisée:
2013
Posté le : 01-03-2009 11h51
Bonjour à tous,
Salut Mth ,

Un essai avec un Bouton Bascule.
Il subsiste un souci avec les lignes 42 et suivantes qui n'ont pas la même structure que les autres
J'ai repris la formule de Mth en la rendant reproductible vers le bas

=SI(MOD(LIGNE();2)=0;Q23;SI(ESTERREUR(CNUM(SUBSTITUE((K22&J22&I22&H22&G22&F22&E22&D22&C22&B22&A22);" ";"")));0;"Manquant"))



Bises à Mimi ,
A+ à tous

Pièce jointe:
zip JC Tri sur Vides.zip   [ Taille: 56.02 Ko - Téléchargements: 862 ]


Cordialement
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#5
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 01-03-2009 13h26
Bonjour tout le monde

Merci JC pour ton fichier,

J'ai l'impression qu'inspecteur peut remplacer le Criteria1:="="  par  Criteria1:="Manquant" ( sourire... étourderie matinale )

A bientôt inspecteur,

Et plein de bises JC
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#6
Aspirant XLPages

Inscription: 05/12/2008

Messages: 36

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 19-03-2009 20h06
salut le forum
merci jcgl pour ta participation :)

je n'ai pas arrivé tous seule à réaliser l'amélioration de mon modèle ; la question est la suivante : est ce qu'il existe un bouton ou un truc dans la feuille "base " pour rendre à chaque fois qu'on veut l'avis vierge c'est à dire la feuille " synthése " il n'y aura aucun défaut

merci d'avance


Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#7
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 20-03-2009 01h10

Bonsoir inspecteur,

Tu trouveras ci-joint ton fichier avec un petit bout de code qui vide ton onglet base en cliquant sur le bouton "Vider"

Ceci dit, c'est juste pour dépanner en attendant que quelqu'un qui connait le vba passe par là, car je que j'ai fait est très mal écrit

Autre inconvénient, une fois les données effacées, je ne sais pas faire un "retour arrière" ... donc en cas d'erreur il ne reste plus qu'à fermer le fichier sans sauvegarder et recommencer ...


Du coup je me demande si un travail à la main ne serait pas mieux :

  • Aller dans l'onglet Base et sélectionner les colonnes C, F, I etc ..
  • Sélectionner le menu Edition / Remplacer
  • Saisir d dans "Rechercher" et ne rien saisir dans "Remplacer par"
  • Puis cliquer sur "Remplacer tout"
Ce n'est finalement pas si long, et permet de ne pas tout effacer par erreur !

Bien à toi,

Mth



Pièce jointe:
zip Vider.zip   [ Taille: 58.03 Ko - Téléchargements: 756 ]
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#8
Aspirant XLPages

Inscription: 05/12/2008

Messages: 36

Système d'exploitation:
PC
Version Excel utilisée:
2003
Posté le : 20-03-2009 14h01
salut le forum
salut mth
merci encore mth pour la rapidité de ta réponse et sa simplicité

mais j'ai une petite question pour limiter l'erreur : est ce qu'on peut faire des boutons similaires mais cette fois si pour chaque type d'impôt et ne pas pour la totalité de la feuille et comme ça on peut vider par type d'impôt et en cas d'erreur on peut réparer uniquement le type d'impôt concerné et on ne perd pas tout le travaille

merci encore infiniment mth et bonne journée

Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#9
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 20-03-2009 19h49
Bonsoir inspecteur, bonsoir le forum

Un peu gênée d'écrire du VBA car je n'y connais rien, mais en attendant mieux voici le même fichier pour n'effacer qu'une seule colonne correspondant à l'impôt choisi.

(au risque de me tromper je continue à croire qu'un simple "edition/remplacer" à la mimine est plus sûr mais bon ...)

Bonne soirée et @ +

Mth

Pièce jointe:
zip Vider2.zip   [ Taille: 57.62 Ko - Téléchargements: 733 ]
Hors Ligne
Rapport   Haut 

Re: cacher des lignes automatiquement selon des critéres
#10
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 21-03-2009 01h00
Bonsoir inspecteur, Mth, JCGL, le Forum,

Citation :
Mth a écrit :
Un peu gênée d'écrire du VBA car je n'y connais rien, mais en attendant mieux voici le même fichier pour n'effacer qu'une seule colonne correspondant à l'impôt choisi.


Bravo Mireille pour quelqu'un qui "n'y connait rien à VBA", tu te débrouilles plutôt bien !

Pour ma part, je trouve ton approche du problème assez intéressante et je te propose juste une amélioration de ta procédure :
Comme en VBA, les Activate et autres Select sont quasi toujours inutiles (et souvent même sources de problèmes), tu peux modifier ton code :
Sub vider2()

Application.ScreenUpdating = False 'pour figer l'affichage

Dim X As Variant
X = Range("V20").Value 'X = la valeur de la cellule V20

Sheets("BASE").Activate 'sélectionne l'onglet Base

Columns(X).Select 'Sélectionne la colonne correspondant à l'impot choisi en cellule S20
    Selection.Replace What:="d", Replacement:="", LookAt:=xlPart, _
            SearchOrder:=xlByRows, MatchCase:=False 'remplace les lettres d par rien

Sheets("Synthese").Activate 'sélectionne l'onglet Synthese

Application.ScreenUpdating = True 'pour réactiver l'affichage

End Sub
... et le remplacer par celui-ci :
Sub vider2()
Dim X As String
    X = Range("V20").Value 'X = la valeur de la cellule V20
    Sheets("BASE").Columns(X).Replace What:="d", Replacement:="", LookAt:=xlPart, _
                SearchOrder:=xlByRows, MatchCase:=False 'remplace les lettres d par rien
End Sub
En te débarrassant des Select, du coup, tu peux te séparer également du Application.ScreenUpdating qui n'a plus lieu d'être.

Cela dit, je suis de ton avis également : la procédure manuelle reste la façon la plus sûre puisqu'elle responsabilise l'utilisateur et permet un retour arrière (annulation de l'action). Par ailleurs, on peut la simplifier d'avantage en nommant les zones à effacer par exemple : ZoneI1, ZoneI2, ZoneI3, etc... Ensuite, un rapide choix dans la Zone de Nom et l'appui sur la touche Suppr suffisent.

Cordialement,


Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes