Microsoft 365 Macro masquer des lignes

Céline49 · 29 Mai 2022

Bonjour,
J'aurais besoin d'un peu d'aide sur une macro.
Je souhaite masquer les lignes 12 à 19 lorsque la cellule B3 = Trimestrielle. Si la cellule B3= Mensuelle, alors conserver toutes les lignes existantes.
Ma macro ne s'exécute pas pas et je n'ai pas de message d'erreur, je ne sais pas d'où provient le problème.
Quelqu'un pourrait-il m'aider?
Un grand merci par avance pour l'aide apportée

TooFatBoy · 29 Mai 2022

Bonjour,

Une proposition :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
'
    If Target.Address = "$B$3" And Target.Value = "Trimestrielle" Then
        Rows("12:19").EntireRow.Hidden = True
    Else
        Rows("12:19").EntireRow.Hidden = False
    End If

End Sub

TooFatBoy · 29 Mai 2022

Bonjour,

Une proposition :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
'
    If Target.Address = "$B$3" And Target.Value = "Trimestrielle" Then
        Rows("12:19").EntireRow.Hidden = True
    Else
        Rows("12:19").EntireRow.Hidden = False
    End If

End Sub

Céline49 · 29 Mai 2022

Bonjour Marcel32, je viens de faire du copier coller...et cela ne fonctionne pas. Pourrais-tu me renvoyer avec le fichier stp?

Usine à gaz · 29 Mai 2022

Bonjour Céline49

Peut-être comme ça :
code dans la feuille :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
If [b3] = "Trimestrielle" Then
Rows("12:19").RowHeight = 0
Else
Rows("12:19").RowHeight = 19.5
End If
End Sub

Affiche ou masque les lignes selon que vous sélectionnez "Mensuelle" ou Trimestrielle"
Fichier joint,
lionel

Céline49 · 29 Mai 2022

Bon mon problème doit venir d'ailleurs car quand je ne recopie sur mon bon fichier, cela ne fonctionne pas. En fait je n'ai pas le bouton activé la macro alors que mon fichier est bien enregistré sous format "classeur excel (prenant en charge les macros)"

TooFatBoy · 29 Mai 2022

Céline49 à dit:
Bonjour Marcel32, je viens de faire du copier coller...et cela ne fonctionne pas. Pourrais-tu me renvoyer avec le fichier stp?

Voilà.

Céline49 · 29 Mai 2022

@Marcel32...mon pb provient en fait que je n'ai plus la fonction d'activation du contenu pour pouvoir exécuter ma macro !!

TooFatBoy · 29 Mai 2022

Céline49 à dit:
Bon mon problème doit venir d'ailleurs car quand je ne recopie sur mon bon fichier, cela ne fonctionne pas. En fait je n'ai pas le bouton activé la macro alors que mon fichier est bien enregistré sous format "classeur excel (prenant en charge les macros)"

C'est aussi la cellule B3 sur ton vrai fichier ?

Céline49 · 29 Mai 2022

Oui j'ai copié l'onglet dans son intégralité

TooFatBoy · 29 Mai 2022

La macro que je t'ai proposée se met dans la feuille concernée et non dans un module.

~~Remarque : je ne te conseille pas la macro de #4 car elle va s'exécuter à chaque modification du contenu d'une cellule de la feuille et en plus elle risque de modifier la hauteur de tes lignes.~~

[edit]
En fait, c'est surtout la macro de #2 que je te déconseille car elle ne fait pas le boulot correctement !
[/edit]

Céline49 · 29 Mai 2022

erreur de débutant. merci Marcel32...C'est quoi la différence entre la feuille et le module?

TooFatBoy · 29 Mai 2022

Pas facile à expliquer...
Je dirais que les macros qui sont dans les modules peuvent être appelées de n'importe où.
En revanche, les PRIVATE sub des feuilles ne peuvent être appelées que dans la feuille.

Ici on utilise la macro Worksheet_Change.
Elle sera exécutée quand le contenu d'une cellule de la feuille dans laquelle se trouve la macro changera.

Usine à gaz · 29 Mai 2022

Re-Bonjour Céline49

Bizarre je suis devenu transparent lol
Z'avez pas vu le #post 4 ?

TooFatBoy · 29 Mai 2022

Usine à gaz à dit:
Re-Bonjour Céline49
Bizarre je suis devenu transparent lol
Z'avez pas vu le #post 4 ?

Toi t'as pas dû voir #7...

Usine à gaz · 29 Mai 2022

Hello Marcel Bon jour :
"Remarque : je ne te conseille pas la macro de #4 car elle va s'exécuter à chaque modification du contenu d'une cellule de la feuille et en plus elle risque de modifier la hauteur de tes lignes."

Tu as testé le fichier ?
lionel

Microsoft 365 Macro masquer des lignes

Céline49

XLDnaute Junior

Pièces jointes

TooFatBoy

TooFatBoy

XLDnaute Barbatruc

Céline49

XLDnaute Junior

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Céline49

XLDnaute Junior

TooFatBoy

XLDnaute Barbatruc

Pièces jointes

Céline49

XLDnaute Junior

Pièces jointes

TooFatBoy

XLDnaute Barbatruc

Céline49

XLDnaute Junior

TooFatBoy

XLDnaute Barbatruc

Céline49

XLDnaute Junior

TooFatBoy

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Discussions similaires