Comment appliquer la formule arrondi( ;4) à d'autres formules

Le
Vincent_C
bonjour à tous et bonnes fêtes de Pâques,

je cherche le moyen par une macro d'appliquer à plusieurs cellules
simultanéement sélectionnées la formule =arrondi( ;4)

nb les cellules contiennent des formules différentes et relativement
longues, comme l'exemple ci dessous:

=(INDEX('626 sectorisation pour cut-off 01-2007_II.xls'!HW;
EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation pour cut-off
01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV("dpt";'[626 sectorisation pour
cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*INDEX('626 sectorisation pour
cut-off 01-2007_II.xls'!HW; EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation pour
cut-off 01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV(STXT(AN37;4;6);'[626
sectorisation pour cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*$M37)

d'avance merci !
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #4397421
Bonjour,

For Each c In Selection
c.Formula = "=Round(" & Mid(c.Formula, 2) & ",4)"
Next c

JB


On 7 avr, 16:08, Vincent_C
bonjour à tous et bonnes fêtes de Pâques,

je cherche le moyen par une macro d'appliquer à plusieurs cellules
simultanéement sélectionnées la formule =arrondi( ;4)

nb les cellules contiennent des formules différentes et relativement
longues, comme l'exemple ci dessous:

=(INDEX('626 sectorisation pour cut-off 01-2007_II.xls'!HW;
EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation pour cut-off
01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV("dpt";'[626 sectorisation pour
cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*INDEX('626 sectorisation p our
cut-off 01-2007_II.xls'!HW; EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation po ur
cut-off 01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV(STXT(AN37;4;6);'[626
sectorisation pour cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*$M37)

d'avance merci !


Vincent_C
Le #4397401
Merci beaucoup ! Super !!


Bonjour,

For Each c In Selection
c.Formula = "=Round(" & Mid(c.Formula, 2) & ",4)"
Next c

JB


On 7 avr, 16:08, Vincent_C
bonjour à tous et bonnes fêtes de Pâques,

je cherche le moyen par une macro d'appliquer à plusieurs cellules
simultanéement sélectionnées la formule =arrondi( ;4)

nb les cellules contiennent des formules différentes et relativement
longues, comme l'exemple ci dessous:

=(INDEX('626 sectorisation pour cut-off 01-2007_II.xls'!HW;
EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation pour cut-off
01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV("dpt";'[626 sectorisation pour
cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*INDEX('626 sectorisation pour
cut-off 01-2007_II.xls'!HW; EQUIV(GAUCHE(AN37;3)*1;'[626 sectorisation pour
cut-off 01-2007_II.xls]Voix'!$R$188:$R$195;); EQUIV(STXT(AN37;4;6);'[626
sectorisation pour cut-off 01-2007_II.xls]Voix'!$R$188:$AF$188;))*$M37)

d'avance merci !







Publicité
Poster une réponse
Anonyme