zone de nom

[RVL]

Bonjour à tous,

Comment créer "proprement" une "zone de nom"....

En fait dans un plan de personnel je deplace les cellules correspondant aux "personnel" à gerer et j'ai configurer des cellules de comptage (NBVAL) sur differentes plages mais les plages de calcul se modifiaient, alors j'ai utilisé les "zone de nom" pour ces plages de calcul mais ce n'est pas le top celle-ci se modifie aussi.

 

[Brigitte]

Re : zone de nom

Bonjour,

Pas tout compris dans ta question mais si le problème est de mettre à jour les listes lors des rajouts, suppressions, une idée : une liste avec la formule DECALER et NBVAL combinées qui marche bien.

'=DECALER(Feuil1!$A$2;;;NBVAL(Feuil1!$A:$A)-1)

Voir exemple ci-joint.

Espérant avoir pu un peu t'aider ou en attendant GODOT (euh non pardon un autre xldien)...

 

[Sofhy]

Re : zone de nom

Bonjour RVL,

Peut être avec une macro qui te permettrait de redéfinir tes plages avant les calcul.
Je sais que l'on peut également le faire avec la formule "decaler", voir le fichier de Tototiti dans ce post : https://www.excel-downloads.com/threads/nb-si-sur-deux-conditions.146560/

Par contre, avec un extrait de ton fichier, ça serait plus simple.

A++
Sofhy

 

[Guest]

Re : zone de nom

Bonjour tous,

RVL, dans ta demande on peut entendre que tu ne veux pas que les plages de noms se modifient comme entendre exactement le contraire.

A+ à tous

 

[RVL]

Re : PB zone de nom et PB deverrouillage cellules.

Re- A TOUS

Enfin, je suis arrivé à reproduire le phénomène sur un fichier exemple, car le fichier d'origine est bcp plus important.
(delicat pour moi "novice" de retranscrire le PB )

Lors de la macro "transfert feuil1 vers feuil2"

des cellules se verrouilles (non verrouillées avant) et ma "zone" de calcul NBVAL se modifie (uniquement sur les petites plages !).
en gris sur le fichier ex les zones initialement verrouillées.

Apparement c'est le code ".Range(c.Address)" qui met la pagaille...

QUE FAIRE POUR ARRIVER A VOTRE CHEVILLE.... ("je craque")

 

[Tibo]

Re : zone de nom

Bonjour,

Ton fichier est protégé.

Pas top pour comprendre et faire des essais

@+

 

[RVL]

Re : zone de nom

Re-

Oupsss,

mdp = "1234" (j'ai mis un mdp pour me remettre das les même conditions que sur le fichier d'origine.

 

[Guest]

Re : zone de nom

Bonjour,

Je ne comprend pas ton problème. Mais si tu veux qu'un nom de se modifie pas, utilise la fonction indirect dans sa définition:

=INDIRECT("Feuil1!M3")

Même si tu supprimes Feuil1!M3 le nom fera toujours référence à la cellule M3 de feuil1.

A+

 

[RVL]

Re : zone de nom

Bonjour Hasco,

Le titre de mon post ne correspont plus exactement à ma demande...
Mes pb sont des modifications sur l'etats des "cellules" (celle en gris dans l'ex donné hier à 20h14 en PJ) certaine passent de deverrouillé à verrouillé ? et de même la zone de calcul (NBVAL) se modifie egalement, et ceci aprés l'execution de la macro"Sub f1versf2()".
Pour info ce PB apparait avec la macro "Sub f1versf2()"
mais pas avec la macro "Sub f2versf1()" et la seule difference entre les 2 est ".Range(c.Address)"

 

[Guest]

Re : zone de nom

re,


[Edition] les lignes en rouge ci-dessous sont fausses j'ai confondu .Cut et .Delete
C'est un comportement normal, car ta macro emploie .Cut pour couper les cellules. La cellule immédiatement en dessous remonte avec son état initial, vérouillé ou non. Par Exemple sur feuille 1 si tu places Toto en F24 et que tu coupes pour le placer ailleurs, F25 (vérouillé) remonte pour prendre sa place.

Je te propose donc comme solution, de simplement nettoyer la cellule de son contenut et son format après transfert, dans F1versF2 cela donne:

[COLOR=blue]For[/COLOR] [COLOR=blue]Each[/COLOR] c [COLOR=blue]In[/COLOR] plage
    [COLOR=blue]If[/COLOR] [COLOR=blue]Not[/COLOR] IsEmpty(c) [COLOR=blue]Then[/COLOR]
        [COLOR=blue]Set[/COLOR] cSource = Sheets([I]"Feuil3"[/I]).UsedRange.Find(what:=c, LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=[COLOR=blue]False[/COLOR])
        [COLOR=blue]If[/COLOR] [COLOR=blue]Not[/COLOR] cSource [COLOR=blue]Is[/COLOR] [COLOR=blue]Nothing[/COLOR] [COLOR=blue]Then[/COLOR]
            [COLOR=blue]If[/COLOR] cSource.Offset(0, 1).Value = [I]"A"[/I] [COLOR=blue]Then[/COLOR]
                 c.Copy Destination:=Sheets([I]"Feuil2"[/I]).Range(c.Address)
                [B] c.Clear [COLOR=green]'Nettoie la cellule, contenu et format.[/COLOR][/B]
            [COLOR=blue]End[/COLOR] [COLOR=blue]If[/COLOR]
        [COLOR=blue]End[/COLOR] [COLOR=blue]If[/COLOR]
    [COLOR=blue]End[/COLOR] [COLOR=blue]If[/COLOR]
[COLOR=blue]Next[/COLOR] c

A+

 

[RVL]

Re : zone de nom

Re-

OK, je modifie et fais un essai...

Q: les cellules de "remplacement" auront quel format ?(par defaut j'utilise arial 8 justifié H&V pour les 150 "toto" et autre sur ce fichier).

 

[Guest]

Re : zone de nom

Re,

Il faut bien lire les réponses.

Il n'y a aucune cellule remplacée, elle sont copiées puis nettoyées.

A+

 

[Calvus]

Re : zone de nom

'=DECALER(Feuil1!$A$2;;;NBVAL(Feuil1!$A:$A)-1)

Bonjour à tous,

J'ai vu cette formule à divers endroits du site.
Pourquoi le -1 ?
Après différents tests, en le supprimant, ça fonctionne aussi bien. Alors quel est l'intérêt ? car il doit bien y en avoir un.

Merci

 

[Guest]

Re : zone de nom

Calvus,

Cette question n'a rien à voir avec le fil.
si tu veux une réponse crée une nouvelle discussion.

A+

 

[Calvus]

Re : zone de nom

Calvus,

Cette question n'a rien à voir avec le fil.
si tu veux une réponse crée une nouvelle discussion.

A+

Hasco,

OK.

Mais j'avais vu par ailleurs ( évidemment je trouve plus où) qu'il était conseillé de poser une question directement dans le post concerné sur un point précis (cité dans le post).
Egalement lu, dans d'autres posts, de créer une nouvelle discussion..
Bref, on ne sait plus à quel saint se vouer
Alors, suivant ton conseil, j'adopterai la seconde règle.

Bonne journée