Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila
alors que cela marche très bien pour les nombres entiers, dès qu'il y a des
décimales, il me fait erreur "400"... mes nombres sont au bon format
(nombre..!). Quelque chose m'échappe
Sub div_Formula()
For Each c In Selection
c.Formula = "=" & c.Value & "/1000"
Next
End Sub
Merci par avance de vos commentaires (XL 2002)
Zol
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nicolas B.
Salut Zolive,
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les cellules, encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
Salut Zolive,
Comme ça, ça devrait aller mieux :
c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les cellules,
encore plus simple :
c.Value = c / 1000
A+
--
Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection,
mais voila alors que cela marche très bien pour les nombres entiers,
dès qu'il y a des décimales, il me fait erreur "400"... mes nombres
sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula()
For Each c In Selection
c.Formula = "=" & c.Value & "/1000"
Next
End Sub
Merci par avance de vos commentaires (XL 2002)
Zol
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les cellules, encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
Zolive
Merci Nicolas B.
2ème fois que tu me retires une épine du pied....Merci encore et bon we. Zolive
"Nicolas B." a écrit dans le message de news:
Salut Zolive,
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les cellules,
encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
Merci Nicolas B.
2ème fois que tu me retires une épine du pied....Merci encore et bon we.
Zolive
"Nicolas B." <nicolas.bruot@adresse.bidon.com> a écrit dans le message de
news:uIxF056IEHA.2928@TK2MSFTNGP10.phx.gbl...
Salut Zolive,
Comme ça, ça devrait aller mieux :
c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les
cellules,
encore plus simple :
c.Value = c / 1000
A+
--
Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection,
mais voila alors que cela marche très bien pour les nombres entiers,
dès qu'il y a des décimales, il me fait erreur "400"... mes nombres
sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula()
For Each c In Selection
c.Formula = "=" & c.Value & "/1000"
Next
End Sub
Merci par avance de vos commentaires (XL 2002)
Zol
2ème fois que tu me retires une épine du pied....Merci encore et bon we. Zolive
"Nicolas B." a écrit dans le message de news:
Salut Zolive,
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les cellules,
encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
FxM
Bonjour,
Juste pour info : tape 1000 dans une cellule vide, Sélectionne cette cellule Menu editon | copier Sélectionne tes cellules à diviser Menu edition | collage special | cocher valeur et division Clic sur OK. C'est fait.
@+ FxM
Zolive wrote:
Merci Nicolas B.
2ème fois que tu me retires une épine du pied....Merci encore et bon we. Zolive
"Nicolas B." a écrit dans le message de news:
Salut Zolive,
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les
cellules,
encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
Bonjour,
Juste pour info :
tape 1000 dans une cellule vide,
Sélectionne cette cellule
Menu editon | copier
Sélectionne tes cellules à diviser
Menu edition | collage special | cocher valeur et division
Clic sur OK. C'est fait.
@+
FxM
Zolive wrote:
Merci Nicolas B.
2ème fois que tu me retires une épine du pied....Merci encore et bon we.
Zolive
"Nicolas B." <nicolas.bruot@adresse.bidon.com> a écrit dans le message de
news:uIxF056IEHA.2928@TK2MSFTNGP10.phx.gbl...
Salut Zolive,
Comme ça, ça devrait aller mieux :
c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les
cellules,
encore plus simple :
c.Value = c / 1000
A+
--
Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection,
mais voila alors que cela marche très bien pour les nombres entiers,
dès qu'il y a des décimales, il me fait erreur "400"... mes nombres
sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula()
For Each c In Selection
c.Formula = "=" & c.Value & "/1000"
Next
End Sub
Merci par avance de vos commentaires (XL 2002)
Zol
Juste pour info : tape 1000 dans une cellule vide, Sélectionne cette cellule Menu editon | copier Sélectionne tes cellules à diviser Menu edition | collage special | cocher valeur et division Clic sur OK. C'est fait.
@+ FxM
Zolive wrote:
Merci Nicolas B.
2ème fois que tu me retires une épine du pied....Merci encore et bon we. Zolive
"Nicolas B." a écrit dans le message de news:
Salut Zolive,
Comme ça, ça devrait aller mieux : c.FormulaLocal = "=" & c.Value & "/1000"
Mais si tu n'as pas besoin d'afficher les formules /1000 dans les
cellules,
encore plus simple : c.Value = c / 1000
A+ -- Nicolas B.
Bonjour à tous,
Voilà: je dois diviser par 1000 tous les nombres d'une selection, mais voila alors que cela marche très bien pour les nombres entiers, dès qu'il y a des décimales, il me fait erreur "400"... mes nombres sont au bon format (nombre..!). Quelque chose m'échappe
Sub div_Formula() For Each c In Selection c.Formula = "=" & c.Value & "/1000" Next End Sub
Merci par avance de vos commentaires (XL 2002) Zol
