Coche et nombre ligne en fonction d'une cellule

Bonsoir à tous,

Je me permet de venir vers vous pour de l'aide

Je joint une ébauche d'un futur projet,

est t'il possible de faire apparaître un nombre de ligne en fonction d'une cellule

Pour mon exemple

Si je coche essai 1 il faudrait faire apparaître autant de ligne que le chiffre dans la cellule à droite

Idem je je coche essai 2

Sachant que les chiffres a droite des coches sont aléatoire

Si un mi ange mi dieu se trouve parmi vous

Par avance Merci a tous

Guillaume04350 a écrit :

est t'il possible de faire apparaître un nombre de ligne en fonction d'une cellule

Bonjour Guillaume,

par faire apparaître un nombre de ligne veux-tu dire dire "insérer des lignes" ?

Bonjour i20100

Dans mon ébauche les deux cases sont cochées maintenant si je viens à décocher une des 2 cases les lignes correspondantes doivent disparaître inversement je recoche un case autant de lignes que le Nombre situé à droite doivent apparaître

Guillaume04350 a écrit :

les lignes correspondantes doivent disparaître

comment plusieurs lignes peuvent correspondent à un chiffre ?

En E3 j'ai 3

J'ai donc mis 3 lignes

Si je décoche Essai 1 les "E3" lignes doivent disparaître

Inversement si je recoche Essai 1 "E3 " lignes doivent apparaître

Je sais pas si je suis compréhensible 🤔🤔👍

Guillaume04350 a écrit :

En E3 j'ai 3

J'ai donc mis 3 lignes

tu as mit 3 lignes à quel endroit ?

De A5 a A7 pour essai 1

De A9 a A12 pour essai 2

re,

voici un exemple à copier sur la page code de l'onglet "Feuil1"

Private Sub CheckBox1_Click()
If CheckBox1.Value Then  '<------- si la case est coché
    Rows("5:7").Hidden = True   '<------- si vrai
Else
    Rows("5:7").Hidden = False  '<------- si faux
End If
End Sub

Merci,

Le problème est que le nombre de ligne est en fonction de E3 et/ou G3

Si en E3 il y a 7 il faudrait que sa écrit 7 lignes

ref 1 essai1

ref 2 essai1

Ref 7 essai1

re,

est ce que le début est toujours la ligne 5 ?

à tester,

Private Sub CheckBox1_Click()
If CheckBox1.Value Then  '<------- si la case est coché
    Rows("5:" & 5 + [E3] - 1).Hidden = True '<------- si vrai
Else
    Rows("5:" & 5 + [E3] - 1).Hidden = False '<------- si faux
End If
End Sub

Oui pour essais 1 par contre essai 2 sera en fonction du nombre de ligne qu'a essai 1

re,

est ce que essai2 commence tout de suite après essa1 ?

si E3 = 3

première ligne de essai2 commence à

Rows(5 + [E3] )

Oui à la suite , je suis pas sur mon Pc la je teste le code dans la journée

Merci

i20100 a écrit :

re,

est ce que essai2 commence tout de suite après essa1 ?

si E3 = 3

première ligne de essai2 commence à

Rows(5 + [E3] )

Merci, par contre je n'ai pas compris pour la seconde coche le debut de la formule

mais je pense que si une autre solution existe car ce qu'il faudrait quand je clique sur essai 1

il faudrait que les textes soit déjà ecrit

Ref essai 1

Ref essai 1

ref essai 1

jusqu'a que le nombre en E3 soit atteint

et si je viens a cocher Essai 2 idem que les texte se mettent a la suite

Ref Essai 2

Ref Essai 2

jusqu'a que le nombre en G3 soit atteint

J'espere que tu arrive a me comprendre :/

Ben en fait c'est bon je pense

juste une chose en plus peut t'on verrouillé la coche si il n'y a pas de nombre ou si il est egal a 0 en E3 ?