transfère de cellules protégées

phlaurent55

Nous a quittés en 2020

Repose en paix

• 27 Février 2011

• #2

Re : transfère de cellules protégées

Bonjour terpick,

si tu veux te donner la peine d'aller lire ce fil:
https://www.excel-downloads.com/threads/remplacer-m-dalerte.158947/

on y parle des protections

à+
Philippe

 

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #3

Re : transfère de cellules protégées

Bonjour, Phlaurent55 !

Merci pour votre réponse rapide. J'ai étudié le fil proposé, mais ce n'est pas tout à fait ce qu'il me faut.

En effet je dois figer uniquement certaines cellules sur une feuille par rapport au tableau, qui est transféré d'une autre.

Si ce n'est pas possible, peut-être je pouvais figer que des cellules avec le mot TOTAL?

J'ai essayé adapter votre Macro à ce besoin:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("TOTAL")) Is Nothing Then
MsgBox ("Cette cellule est protégée contre modification")
[E1].Select
End If
End Sub

mais elle bogue. Je sais qu'il y a une erreur, mais mes connaissances du VBA ne vont pas si loin.
à vrai dire, je ne comprends pas trop ces deux lignes:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("TOTAL")) Is Nothing Then

ou, plutôt, je les comprends à moitié seulement.

Cijoint.fr - Service gratuit de dépôt de fichiers

A +

 

Vote positif 0 Vote négatif

Hippolite

XLDnaute Accro

• 27 Février 2011

• #4

Re : transfère de cellules protégées

Bonjour,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cliquez pour agrandir...

Le sous-programme est lancé quand une sélection est effectuée dans la feuille, la sélection est déinie par Target.

If Not Intersect(Target, Range("TOTAL")) Is Nothing Then

Cliquez pour agrandir...

Si la sélection et les cellules "TOTAL" ont une partie commune, alors...
Si les deux n'ont qu'une seule cellule, celà revient à dire Si je clique sur "TOTAL", alors...

 

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #5

Re : transfère de cellules protégées

Bonsoir, Hippolite,
Salut, le Forum!

Je vous remercie, Hippolite, pour les explications. Le truc, c'est que la macro ne marche pas.
Vous voyez peut-être, pourquoi? Je serai très reconnaissant.
Voilà le classeur:

Cijoint.fr - Service gratuit de dépôt de fichiers

Encore merci!

A +

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 27 Février 2011

• #6

Re : transfère de cellules protégées

Bonsoir

TOTAL fait référence à :=#REF!#REF!

Forcément ca marche tout de suite moins bien

Réaffectes correctement TOTAL avec une référence valide, et cela devrait aller mieux.

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 27 Février 2011

• #7

Re : transfère de cellules protégées

Re,

il n'y a pas de zone nommée "Total" dans le fichier joint
je suppose que trepick parle de la cellule qui contient le mot "Total"
et qu'il veut se servir de la position de cette cellule comme point de départ

à+
Philippe

 

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #8

Re : transfère de cellules protégées

Bonsoir, Staple1600 !
Merci pour votre réponse. Ce n'est pas la mauvaise foi, mais je n'ai vraiment pas compris ce que vous voulais dire.
Mon niveau dans VBA pour l'instant ne va pas si loin.
Si vous avez qques instants, le vous serais reconnaissant pour les explications.

Merci encore

A+

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 27 Février 2011

• #9

Re : transfère de cellules protégées

Re


Si il y a une zone nommée TOTAL
(Voir la copie d'écran ci-dessous)

Et comme tu le sais phlaurent, en VBA
Range("TOTAL") renvoie forcément à une plage de cellules nommées TOTAL

(d'ou mon précédent message)

 

Pièces jointes

• total.png

  5.8 KB · Affichages: 55

Dernière édition: 27 Février 2011

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #10

Re : transfère de cellules protégées

Phlaurent55, vous avez raison. Je voudrais protéger toutes les cellules avec le mot total, au plus simple.
Mais, si c'est possible, je voudrais protéger également et tout ce qui est indiqué en jaune dans le fichier joint, c-a-d, les pieds et les têtes des tableaux.

Merci pour votre intérêt.

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 27 Février 2011

• #11

Re : transfère de cellules protégées

Re,

Staple1600 à dit:

Re


Si il y a une zone nommée TOTAL
(Voir la copie d'écran ci-dessous)

Et comme tu le sais phlaurent, en VBA
Range("TOTAL") renvoie forcément à une plage de cellules nommées TOTAL

(d'ou mon précédent message)

Cliquez pour agrandir...

j'ai tout simplement cliqué dans la zone Nom dans laquelle il n'y a qu'une zone nommée " montanthoraires"
c'est vrai qu'en faisant Ctrl+F3 on découvre des choses hallucinantes 😕

à+
Philippe

 

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #12

Re : transfère de cellules protégées

C'est moi qui a créé toutes ces zones.
Ce fichier, c'est juste un moreau.
Je reviens en effet, à mon besoin, qui n'a rien avec les zones nommées. Il faut que je fige les en-tetes et les pieds des tableaux qui sont transfères de la page Feuille_tableau vers la page Matrice. Mais, si ce n'est pas trop faisable, je voudrais figer au moin toutes les cellules avec le mot TOTAL.
Dites, s'il vous plaît, si c'est possible.

Merci pour votre patience.

A+

 

Vote positif 0 Vote négatif

T

terpick

XLDnaute Occasionnel

• 27 Février 2011

• #13

Re : transfère de cellules protégées

Merci pour astuce Ctrl+F3.
Tous les jours je découvre avec vous de nouvelles choses dans Excel.

 

Vote positif 0 Vote négatif