Remplissage colonne selon index

Bonjour.

Svp j'ai cette procédure qui me permet d'attribuer à AU78 la valeur 0 ou 17 et permet de remplir ma plage de 17 colonnes en fonctions des indices de 1 à 17 ainsi que de 18 à 34.

Quand il prend la valeur 0, il peut afficher 17 éléments (de 1 à 17), quand il prend la valeur 17, il affiche les 17 autres (de 18 à 34). Je voudrais qu'il affiche 17 éléments supplémentaires ( de 34 à 51)

J'aimerais qu'elle puisse prendre les valeurs 0 ou 17 ou 34.

                    If CellValue = "" Then GoTo 100
                     If Sheets("INVOICE").Range("AU78").Value = 0 Then
                        Sheets("INVOICE").Range("AU78").Value = 17

                        GoTo 100
                     Else
                        Sheets("INVOICE").Range("AU78").Value = 0
                        GoTo 100

                     End If

Bonjour Rodryg, bonjour le forum,

Perso je n'ai rien compris !... Bon, ce n'est pas la première fois remarque...

Un fichier exemple ou le code complet serait le bienvenu...

Bonjour,

Voici des brides de code, afin d'avoir une idée de la marche à suivre :

Sub masub()

'....mon code

debut = i * 17 + 1
fin = (i + 1) * 17

'si i = 0 alors debut = 1 et fin = 17
'si i = 1 alors debut = 18 et fin = 34
'si i = 2 alors debut = 35 et fin = 51
'ensuite, à vous de définir les conditions qui fixeront en amont la valeur de i

'exemple, pour afficher 
Columns(debut & ":" & fin).hidden = false

'reste de mon code

end sub

Mais comme l'a fait remarquer ThauThème, le problème n'est pas limpide pour le moment...

Cdlt,

Merci 3GB et ThauThème.

J'avoue avoir mal posé le problème. Sans le fichier, il était difficile de se placers dans le contexte.

J'ai pu trouver une solution.

Cdlt

Rechercher des sujets similaires à "remplissage colonne index"