Masquer Une Ligne Vba Un
Voir sur copie en PJ. Bonne soirée. Cordialement. Edit: salut Job, décidément, tu me précèdes toujours. Copie de Exemple 35. 5 KB · Affichages: 76 35. 5 KB · Affichages: 70 #6 Re, Si la formule en Y15 ne dépend que des cellules de la feuille vous pouvez utiliser cette macro: Rows(15)(IIf([Y15], [Y15], 11)) = False If [Y15] And [Y15] < 11 Then Rows(15)([Y15])(11 - [Y15]) = True Edit: bonsoir Papou-net, pas rafraîchi. Dernière édition: 23 Novembre 2015 #7 Re-bonjour, bonjour, chers job75 et Papou-net, Un autre essai... Range("A25:A26"). = True Range("Y15") #8 Re, @ Papou-net: avec Worksheet_Calculate, s'il y a des fonctions volatiles dans la feuille comme MAINTENANT ou DECALER, la macro boucle sans fin ou ne s'arrête que quand l'espace pile est insuffisant. Pour l'éviter il faut alors utiliser les Application. EnableEvents = False/True. Masquer une ligne vba 2019. #9 RE Tu as entièrement raison, ça m'a échappé. Je ne le referai plus, c'est promis. #10 Bonjour DoubleZero, job75, Papou-net, le forum, Merci pour votre aide.
Masquer Une Ligne Vba Download
#2 Re: Code VBA masquer des lignes en fonction de la valeur d'une cellule Bonjour, tamatave33, le Forum, Un essai, tout en espérant avoir compris le besoin... Code: Option Explicit Sub Ligne_masquer() Dim i As Long reenUpdating = False i = [y15] Range("a15")(i). = True reenUpdating = True End Sub Sub Ligne_afficher() = False A bientôt #3 Bonsoir DoubleZero, le forum, Merci pour ta réponse, mais je pense que ma demande n'était pas suffisamment claire. La valeur de la cellule Y15 peut varier de 0 à 11. Si elle est égale à 0 ou a 11, les lignes 15 à 25 sont affichées. si elle est égale à 1, seule la ligne 15 est affichée. Masquer une ligne vba et. Si elle est égale à 2, les lignes 15 et 16 sont affichées, si elle est égale à 3, les lignes 15, 16 et 17 sont affichées, et ainsi de suite. Voici le code que j'ai écris: Private Sub Worksheet_Change(ByVal Target As Range) Dim k As Integer If Not Intersect(Target, Range("Y15")) Is Nothing Then k = Range("Y15") Select Case k Case Is = 0 Range("A15:A25"). = False Case Is = 11 Case Is = 10 Range("A15:A24").
Masquer Une Ligne Vba 2019
Merci encore pour ton aide Bonne soirée
remplace donc pictures par checkboxes et cela devrait fonctionner 23 août 2010 à 09:50 bonjour et bon début de semaine, je n'arrive toujours pas à masquer mes cases à cocher. j'ai changé le nom en "case" mais rien à faire. cette case ne se masque oblème de syntaxe de nom. quand je dis le nom, c'est ce que j'écris sous excel dans la colonne qui affiche généralement les cordonnées des celules. Code VBA masquer des lignes en fonction de la valeur d'une cellule | Excel-Downloads. si quelqu'un peut m'aider, merci If eckBoxes(Nb) "case" Then eckBoxes(Nb) True 23 août 2010 à 09:57 Come l'a dit Lermite22, son code est plus simple, j'y avais pensé à un moment mais pas trop cherché:p Et relis ce que l'on t'a écrit ce n'est pas hidden... merci à vous deux, j'étais effectivement resté sur ta premiere idée. la réponse de lermite22 fonctionne. merci encore jerome