Forum |  HardWare.fr | News | Articles | PC | Prix | S'identifier | S'inscrire | Aide | Shop Recherche
234 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Masquer ligne selon condition

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Masquer ligne selon condition

n°2263910
belchatsar
Posté le 04-08-2015 à 17:40:57  profilanswer
 

Bonjour,
 je cherche à masquer les lignes d'une feuille selon deux critères précis
il s'agit des lignes 98 à 266
si la valeur d'une cellule dans la plage A98 à A266,  est déjà présente edans la plage A5 et A92 que sur la même ligne  mais dans la colonne Vde V5 V92 la valeur est égale à zéro alors masquer la ligne.  
j'ai testé le code ci dessous mais il m'affiche à chaque fois l'indice n'appartient pas à la selection
 
[cpp]Sub masquer1()
 
 Dim x As Variant
 Dim I As Integer
 Dim J As Integer
 
ReDim x(nb_codes)
nb_codes = Sheets("Non-current Assets form" ).Cells(5, 1).Cells(92, 1)
 
For I = 1 To nb_codes
11   x(I) = Sheets("Non-current Assets form" ).Cells(I, 1)
Next I
 
For I = 1 To UBound(x)
   x(I) = Sheets("Non-current Assets form" ).Cells(I, 1)
Next I
 
Sheets("Non-current Assets form" ).Select
 
 For J = 98 To 107
 If Cells(J, 1).Value = x(I) And Cells(I, 22).Value = 0 Then
 Rows(J).Hidden = True
 End If
 Next
 
 For J = 109 To 120
 If Cells(I, 1).Value = x(I) And Cells(I, 22).Value = 0 Then
 Rows(J).Hidden = True
 End If
 Next
 
 For J = 122 To 130
 If Cells(J, 1).Value = x(I) And Cells(I, 22).Value = 0 Then
 Rows(J).Hidden = True
 End If
 Next
end sub

mood
Publicité
Posté le 04-08-2015 à 17:40:57  profilanswer
 

n°2263937
Marc L
Posté le 05-08-2015 à 11:18:21  profilanswer
 

 
           Bonjour !
 
           Conformément aux règles de ce forum, merci de baliser le code via l'icône dédiée ‼
 
           La conception par boucle est à éviter, mieux vaut utiliser un filtre ou un filtre avancé …
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Masquer ligne selon condition

 

Sujets relatifs
Aide pour mise en ligne site Prestashop 1.5 : Page blancheInteractions script bash et application en ligne de commande
Ligne d'affichage étrange ('set', 'anonymizeIp', true);Condition temporelle : comparaition de date + ou - delais.
variable dans une condition bash[Python] Tetris, besoin d'aide pour élimination d'une ligne complète
supprimer la premiere ligne d'un fichierCondition sur une boucle for
Reproduire ligne avec plusieurs Cases d'option/Zone de groupe ET MacroBarre de menu : retour à la ligne
Plus de sujets relatifs à : Masquer ligne selon condition


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR