Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Maragua
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
M

Maragua

Guest
Re bonjour,
J'ai un petit souci mon code semble être bon mais ça marche pas 😕
Mon code permet de détecter dans ma feuille "Matrix" la valeur dans ma case "EnableFF" (Case I5): Oui ou Non et de masquer ma plage de cellule que j'ai nommé "HideFrequentFlyer" si on a "Non" dans la case "EnableFF".
Le souci c'est que la ça ne masque rien. Je pense que j'ai pas mis la bonne dénominations pour masquer mes cellules.

Code: 
Private Sub Worksheet_Hide(ByVal Target As Range)
Sheets("Matrix").Select
Target.Adress = "EnableFF"
If Target.Value <> "No" Then
                Sheets("Test page").Select
                .Rows("HideFrequentFlyer").Hidden = True
            Case Else
                Sheets("Test page").Rows("HideFrequnetFlyer").Hidden = False
        End Select
End Sub

Merci de votre aide.
 
Trier par date Trier par votes
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Toujours pas :'(
J'ai mis le ode dans ma feuille "Matrix", rien n'y fait.
Je l'ai mis dans ma feuille "Test page", non plus.
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Matrix").Select
Target.Adress = "EnableFF"
If Target.Value <> "No" Then
                Sheets("Test page").Active
                Range("HideFrequentFlyer").EntireRow.Hidden = True
            Case Else
                Sheets("Test page").Active
                Range("HideFrequnetFlyer").EntireRow.Hidden = False
        End Select

End Sub

Si vous avez une autre solution, je n'arrive pas a m'en sortir.
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Je viens de faire les modification suivante:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Matrix").Select
Target.Adress = "EnableFF"
If Target.Value <> "No" Then
Sheets("Test page").Active
Range("HideFrequentFlyer").EntireRow.Hidden = True
Else
Sheets("Test page").Rows("HideFrequnetFlyer").Hidden = False
End If
End Sub

Il me dit qu'il y a un probleme avec Target.Adress +"EnableFF"
Si quelqu'un peut m'aider, merci.
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Re,

attention le code est dans un module de feuille, si pas d'autre précision s'appliquera à cette même feuille, si feuille différente, la préciser :
Code: 
Sheets("NomFeuille").Range("maligne").EntireRow.Hidden = True
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Merci Pierrot, on avance.
Private Sub Worksheet_SelectionChange(ByVal Cible As Range)
Sheets("Matrix").Cible.Adress = "EnableFF"
If Cible.Value <> "No" Then
Sheets("Test page").Range("HideFrequentFlyer").EntireRow.Hidden = True
End If
If Cible.Value <> "Yes" Then
Sheets("Test page").Range("HideFrequnetFlyer").EntireRow.Hidden = False
End If
End Sub

Le code a l'air nickel.
Sauf qu'a la compile, j'ai un "Runtime Error 438:
Object doesn't support this propert or method"
Sur ma ligne :
Sheets("Matrix").Cible.Adress = "EnableFF"

Actuellement, mon code est dans ma feuille " Matrix"
J'avoue m'avoir jamais compris a quoi servait les modules.
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Bonsoir


Target.Address avec 2 deux est la bonne syntaxe

et ceci n'existe pas
Private Sub Worksheet_Hide(ByVal Target As Range)
Cliquez pour agrandir...
PS: Target.Address est un mot réservé par VBA
Ci-dessous extrait de l'aide VBA d'Excel
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Bonjour tout le monde,
J'ai refactore mon code, il semble mieux mais j'ai un souci je n'arrive pas a faire réapparaitre les cellules si la réponse est oui.
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("EnableFF")) Is Nothing Then
        If Target.Value = "No" Then
            Sheets("Test page").Range("HideFrequentFlyer").EntireRow.Hidden = True
            Target.Offset(0, 1) = "No"
            Target.Offset(0, 2) = "No"
        Else: Target.Value = "Yes"
            Sheets("Test page").Range("HideFrequnetFlyer").EntireRow.Hidden = False
        End If
    End If
End Sub

J'ai changé d'erreur 😉
"Application-defined or object-defined error.

Je tourne en rond mais je vais y arriver.
J'ai une autre petite question omment fait-on pour que les macro s'execute automatiquement a l'oyuverture du classeur que l'on soit pas obliger les lancer a chaque coup.
Merci de votre aide.
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Bonjour,
J'ai une autre petite question omment fait-on pour que les macro s'execute automatiquement a l'oyuverture du classeur que l'on soit pas obliger les lancer a chaque coup.
Cliquez pour agrandir...

pour lancer une procédure à l'ouvertre du classeur, il faut utiliser l'événement "Workbook_Open", et ce dans le module "ThisWorkbook"..
Code: 
Option Explicit
Private Sub Workbook_Open()
'ton code
End Sub

pour ton erreur, sans plus de détails et sans pouvoir reproduire le cas, difficile à dire....

bonne journée
@+
 
Vote positif 0 Vote négatif
Re : Masquer une plage nommee dans une feuille suivant la valeur d'une cellule

Bonjour,

l'événement "Workbook_Open()" ne possède pas d'argument "target"... et dans ce cas attention également à bien préciser la ou les feuilles sur lesquelles tu veux intervenir....
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
564
Yogean
Y
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
1 K
Nel'
N
L
  • Question Question
Microsoft 365 Report de valeur d'une cellule dans une autre cellule en fonction de la dernière cellule non vide d'une ligne
Réponses
1
Affichages
1 K
sylvanu
D
  • Question Question
XL 2016 Formulaire permettant de masquer et/ou d'afficher une ligne VBA en fonction d'un caractère et/ou d'une couleur
Réponses
9
Affichages
2 K
doby
D
C
  • Résolu(e)
Microsoft 365 Déplacer une ligne en fonction de la valeur d'une cellule
Réponses
4
Affichages
1 K
cecenico
C
J
  • Résolu(e)
XL 2016 Aide Macro VBA - Reporter valeurs Feuille 1 dans une autre feuille 2 à partir d'une certaine cellule
Réponses
9
Affichages
5 K
jo77
J
A
  • Question Question
Microsoft 365 Problème, ma macro change la plage de cellule dans une autre feuille
Réponses
6
Affichages
2 K
akira21
A
M
  • Résolu(e)
Supprimer une ligne d'un tableau selon la valeur d'une cellule sous VBA (sans supprimer les lignes au dessus)
Réponses
14
Affichages
9 K
MaDesn
M
D
  • Résolu(e)
XL 2016 recherche de la valeur d'une cellule dans une autre feuille
Réponses
12
Affichages
1 K
dcas
D
F
  • Question Question
Microsoft 365 Déplacer une valeur dans une ligne vers la première cellule non vide vers la gauche
Réponses
6
Affichages
1 K
Fred999
F
F
  • Question Question
Collage de cellules non vides dans une plage ciblee
Réponses
8
Affichages
1 K
job75
P
  • Question Question
Selection de la premier cellule vide d'une plage
Réponses
5
Affichages
2 K
popcorn
P
B
  • Question Question
Suivi des modifications d'une cellule dans une feuille vers une autres
Réponses
8
Affichages
1 K
bassmart
B
D
  • Question Question
Excel => VBA => Intégrer variable dans une formule de plage pour insérer une formule
Réponses
5
Affichages
6 K
demonsares
D
S
  • Question Question
Problème d'insertion de formules dans une plage de cellules
Réponses
2
Affichages
1 K
Sunfreez
S
C
  • Question Question
Changement de couleur d'une cellule dans une plage suivant la valeur.
Réponses
1
Affichages
797
Compte Supprimé 979
C
M
  • Question Question
copier la valeur d'une cellule d'une feuille excel dans une autre feuille
Réponses
2
Affichages
2 K
mephis
M
  • Question Question
[VBA] Construire userform et récupérer valeur d'une liste déroulante dans une cellule
2
Réponses
26
Affichages
35 K
nat54
L
  • Question Question
Afficher/masquer une ligne en fonction d'une valeur
Réponses
3
Affichages
2 K
Lexor
L
T
  • Question Question
Afficher ou masquer lignes d'une feuille en fonction du contenu cellule autre feuille
Réponses
6
Affichages
3 K
Tata Yoyo
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…