Autorisation modification certaines lignes

[Anthonymctm]

Bonjour à tous,

Sur un de mes fichier j'essaye de protéger la feuille et de ne rendre accessible que certaines cellules.

Les cellules à autoriser seraient plusieurs lignes.

A l'aide d'une petite succession de formules j'obtient toutes mes lignes à autoriser:

=14:17;19;21;23:38;40:52;54:67;69:79;81:94;96:103;105;107:114;116:119;121;123:135;137:139;141:163;165:183;185:205;207:208;210:211;213:220;223:230;232:238;240:249;251:255;257:263;265:269;271:277;279:282;285:289;291:298;300:302;304:309;311:320;322:325;327:330;332:335;337:340;342:345;347:377;379:382;384:409;411:414;416:419;422;423;424;425;426;427;428;429

Mais quand je les renseignes dans autoriser la modification des plages, j'obtien le message suivant : La référence que vous avez tapée n'est pas valide

Si je dois tout sélectionner à la souris j'ai pas finit... ^^

 

[xUpsilon]

Bonjour,

Je n'ai jamais essayé par moi même mais il existe la propriété Cells(x,x).Locked = True/False, ça pourrait t'être utile !

Bonne continuation

 

[Anthonymctm]

Bonjour et merci

Mais pardon, c'est du chinois pour moi ^^'

 

[xUpsilon]

Re,

Eh bien, par code VBA, tu pourrais sélectionner toutes ces lignes qui t'intéresse, et après cela insérer qqchose du style "pour chaque cellule de ma sélection, les verrouiller (locked)". Cells(x,x).Locked = True ça veut dire que tu verrouilles la cellule XX (une fois que tu auras protégé la feuille bien entendu).

Bonne continuation

 

[Anthonymctm]

Ah oui ça m’intéresse, tu saurais me faire le code ?

 

[xUpsilon]

Euh oui bien sûr, enfin je pense que toi aussi tu pourrais le faire
En soit il s'agit simplement de stocker les valeurs de tes lignes quelque part, puis de boucler sur ces lignes pour dire qu'elles ne sont pas locked.

Bonne continuation

 

[Anthonymctm]

Yes, merci tant pis.

Je vais simplement défusionner toutes mes cellules et toutes les sélectionner manuellement par autorisation des plages.

 

[xUpsilon]

Heinn ? Bon envoie un fichier exemple avec ta liste de lignes à déverrouiller dedans, je vais te faire ça.

 

[Anthonymctm]

Non mais t'embête pas, je pensais que c'était simple à faire c'est tout (simple pour toi mais trop compliqué pour moi, je suis une bille en VBA ^^')

Les lignes sont celles que j'ai mise en message 1 après c'est juste que j'ai des cellules fusionnées de A1 à A150 puis B1 à B10, B11 à B30, etc

Etc du coup je peux pas sélectionner juste la ligne 14, ça me prend desuite toutes les lignes de 1 à 150

 

[Anthonymctm]

Un petit up si jamais quelqu’un saurait faire cette macro

 

[xUpsilon]

Re,

Voici un exemple ci-joint d'une boucle qui déverrouille toutes les cellules (dans la colonne A) dont le numéro correspond à une valeur du tableau (array) Montab. (Dans l'exemple j'ai rempli ses valeurs par la valeur de ma variable d'incrémentation).

Bonne continuation