XL 2019 Références perdues après ajout de colonnes

halecs93 · 3 Novembre 2022

Bonjour,

Et encore un grand merci aux contributeurs du forum. J'ai pu, presque, finaliser, mon outil de planning horaire avec, entre autres, un userform permettant d'ajoutant des colonnes. Cependant, jusqu'à 8 colonnes ajouter, les références de calcul (situé sur l'onglet récapitulatif) se mettent bien à jour. Au delà, cela ne fonctionne plus.

Quelqu'un(e) aurait une idée ? Je joints mon fichier anonymisé.

Un grand grand merci.

sylvanu · 3 Novembre 2022

Bonjour Halecs,
Après lecture rapide, je ne comprends pas cette ligne :

VB:

Sheets("Donnees").Range("T24").Formula = formule

Cette cellule est fusionnées ( Q24:V24 ) et contient du texte ( HEURES CONTRAT RESTANTES )
Qu'avez vous voulu faire ?

fanfan38 · 3 Novembre 2022

J'ai ajouté 10 colonnes chez moi ça marche...
Une modif:

VB:

nbCols = Val(TextBox1.Value)

dans l'userform...

A+ François

halecs93 · 3 Novembre 2022

fanfan38 à dit:
J'ai ajouté 10 colonnes chez moi ça marche...
Une modif:

VB:

nbCols = Val(TextBox1.Value)

dans l'userform...

A+ François

Bonjour et merci. Mais.... dans l'onglet "récapitulatif", il y a bien un message d'erreur qui apparaît toujours au-delà des 8 colonnes ajoutées (à partir de la cellule AB22). Et je n'arrive pas à en comprendre la raison.

sylvanu · 3 Novembre 2022

Re, bonjour fanfan,
Un autre point. En Récapitulatif AB22 vous avez :

VB:

=INDIRECT($A22 &"!" &CAR(COLONNE()+64) &"40")

CAR(COLONNE()+64) marche bien jusqu'à "Z" ce qui donne une colonne. Au delà cela ne marche plus car vous n'obtenez pas AA mais "\" qui n'est plus un nom de colonne, c'est le cas dans votre fichier.
Pour vous en convaincre, dans Récapitulatif vous supprimez les colonnes Y et Z, et les formules "remarchent".
Peut être une solution :

Code:

=SI(COLONNE()<27;INDIRECT("SEPTEMBRE"&"!"&CAR(COLONNE()+64)&"40");INDIRECT("SEPTEMBRE"&"!"&"A"&CAR(COLONNE()-25+64)&"40"))

mais ça ne marchera que jusqu'à AZ, pas au delà. Il faut je pense jouer avec un modulo 26 pour être indépendant du N° de colonne.
[edit]
Il serait plus simple je pense d'utiliser DECALER plutot que de reconstituer le nom des colonnes, avec en Récapitulatif AB22 AC22 :

VB:

=DECALER(INDIRECT($A22&"!A40");0;COLONNE()-1)

halecs93 · 3 Novembre 2022

sylvanu à dit:
Bonjour Halecs,
Après lecture rapide, je ne comprends pas cette ligne :

VB:

Sheets("Donnees").Range("T24").Formula = formule

Cette cellule est fusionnées ( Q24:V24 ) et contient du texte ( HEURES CONTRAT RESTANTES )
Qu'avez vous voulu faire ?

Hmmm je dois avouer que j'ai dû me perdre un peu dans la conception

sylvanu · 3 Novembre 2022

Lisez aussi le post #5, je pense qu'il y a un bug dans votre fichier.

halecs93 · 3 Novembre 2022

sylvanu à dit:
Re, bonjour fanfan,
Un autre point. En Récapitulatif AB22 vous avez :

VB:

=INDIRECT($A22 &"!" &CAR(COLONNE()+64) &"40")

CAR(COLONNE()+64) marche bien jusqu'à "Z" ce qui donne une colonne. Au delà cela ne marche plus car vous n'obtenez pas AA mais "\" qui n'est plus un nom de colonne, c'est le cas dans votre fichier.
Pour vous en convaincre, dans Récapitulatif vous supprimez les colonnes Y et Z, et les formules "remarchent".
Peut être une solution :

Code:

=SI(COLONNE()<27;INDIRECT("SEPTEMBRE"&"!"&CAR(COLONNE()+64)&"40");INDIRECT("SEPTEMBRE"&"!"&"A"&CAR(COLONNE()-25+64)&"40"))

mais ça ne marchera que jusqu'à AZ, pas au delà. Il faut je pense jouer avec un modulo 26 pour être indépendant du N° de colonne.
[edit]
Il serait plus simple je pense d'utiliser DECALER plutot que de reconstituer le nom des colonnes, avec en Récapitulatif AB22 AC22 :

VB:

=DECALER(INDIRECT($A22&"!A40");0;COLONNE()-1)

Bonjour, tout à fait. Cela corrige le problème pour la colonne référencé comme CA mais pas les suivantes. Je me tire les cheveux .....

sylvanu · 3 Novembre 2022

Quelles suivantes ? Précisez.
Avec cette formule, cela supprime les #REF dans les colonnes AB:AJ.

halecs93 · 3 Novembre 2022

sylvanu à dit:
Quelles suivantes ? Précisez.
Avec cette formule, cela supprime les #REF dans les colonnes AB:AJ.

De AC à AJ j'ai toujours le même message d'erreur (sur l'onglet [récapitulatif]

sylvanu · 3 Novembre 2022

N'étant pas devin, je ne peux pas imaginer votre fichier. Fournissez un ex.
En PJ un ex avec les deux formules, plus de #REF. J'ai bidouillé les données dans les mois pour être plus lisible pour l'ex.

halecs93 · 3 Novembre 2022

sylvanu à dit:
N'étant pas devin, je ne peux pas imaginer votre fichier. Fournissez un ex.
En PJ un ex avec les deux formules, plus de #REF. J'ai bidouillé les données dans les mois pour être plus lisible pour l'ex.

Réellement navré. JE faisais référence à un fichier envoyé au cours de la discussion.

En ce qui concerne votre proposition, cela semble fonctionner à merveille. Tous mes remerciements.

XL 2019 Références perdues après ajout de colonnes

halecs93

XLDnaute Impliqué

Pièces jointes

sylvanu

XLDnaute Barbatruc

fanfan38

XLDnaute Barbatruc

Pièces jointes

halecs93

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

halecs93

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

halecs93

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

halecs93

XLDnaute Impliqué

sylvanu

XLDnaute Barbatruc

Pièces jointes

halecs93

XLDnaute Impliqué

Discussions similaires