Apr=E8s avoir parcouru tr=E8s attentivement le site, j'ai bien compris
qu'utiliser un tableau sous word n'=E9tait pas la meilleure solution et
qu'il =E9tait pr=E9f=E9rable d'utiliser excel.
N=E9anmoins je persiste, et j'ai donc mon tableau =E0 plusieurs lignes et
plusieurs colonnes, des sous-totaux et m=EAme un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre =E0 jour le
tableau donc tout va bien.
Except=E9 le fait, que de temps =E0 autres, l'utilisateur du tableau
pourra =EAtre amen=E9 =E0 ins=E9rer de nouvelles lignes, ce qui veut dire
que mes sous-totaux qui sont d=E9finis de mani=E8re fixe (SUM(b1:b6) par
exemple) n'int=E9grent pas la cellule suppl=E9mentaire. Donc les sommes
sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilit=E9 de
d=E9finir la plage de cellules d'un sous-total par un nom (toto) et du
coup =E9crire ma formule SUM (toto)qui s'adapterai =E0 l'ajout ou la
suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en
ligne.
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
Oliv'
juliette que je salut a écrit dans
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Merci pour votre réponse.
Essaye avec sum(above) pour la somme au dessus sum(left) à gauche ou sum(right) à droite. Fait attention à la gestion des virgules 1.02 donne 3 et non 1,02 idem s'il manque des valeurs ex un tableau à 1 colonne et 4 lignes a1= 2 a2=(rien) a3=1,02 a4=toto a5=sum(above)
et bien ton sum est faux il indiquera 1,02
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
juliette <Juliette.Frehel@socgen.com> que je salut a écrit dans
1117785933.894994.248160@g44g2000cwa.googlegroups.com
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris
qu'utiliser un tableau sous word n'était pas la meilleure solution et
qu'il était préférable d'utiliser excel.
Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et
plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le
tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau
pourra être amené à insérer de nouvelles lignes, ce qui veut dire
que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par
exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes
sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de
définir la plage de cellules d'un sous-total par un nom (toto) et du
coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la
suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en
ligne.
Merci pour votre réponse.
Essaye avec sum(above) pour la somme au dessus sum(left) à gauche ou
sum(right) à droite.
Fait attention à la gestion des virgules 1.02 donne 3 et non 1,02
idem s'il manque des valeurs ex un tableau à 1 colonne et 4 lignes
a1= 2
a2=(rien)
a3=1,02
a4=toto
a5=sum(above)
et bien ton sum est faux il indiquera 1,02
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Have a nice day
Oliv'
Pour me joindre : http://cerbermail.com/?V8r2o1YHl4
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Merci pour votre réponse.
Essaye avec sum(above) pour la somme au dessus sum(left) à gauche ou sum(right) à droite. Fait attention à la gestion des virgules 1.02 donne 3 et non 1,02 idem s'il manque des valeurs ex un tableau à 1 colonne et 4 lignes a1= 2 a2=(rien) a3=1,02 a4=toto a5=sum(above)
et bien ton sum est faux il indiquera 1,02
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Have a nice day Oliv' Pour me joindre : http://cerbermail.com/?V8r2o1YHl4 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Circé
Bonjour juliette,
juliette avait soumis l'idée :
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste,
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as bien compris que la meilleure solution était d'utiliser Excel ?....
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien. Euh... ctrl+A c'est pour tout sélectionner... La mise à jour c'est
F9...
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Ben non, parce que ça ne marche pas comme ça dans Word... Lorsqu'on donne un nom à une plage dans Word, c'est du texte, ce qui me paraît logique... Donc, si tu affectes un signet à des cellules en les sélectionnant, et que tu fais une somme avec ce signet, ce ne sera pas calculé, puisque ce sera du texte.
Tu ne peux donc faire de calcul qu'avec des références de lignes et de colonnes, mais comme dans Word les références relatives n'existent pas, ça ne résout pas ton problème !
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser "ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total de la ligne à gauche : { =SUM(ABOVE) } { =SUM(LEFT) }
Par ailleurs, si tu veux insérer hors tableau un calcul, tu dois affecter un signet au tableau, puis l'utilisation ensuite dans ton calcul comme : { =SUM (tablo d:d) } qui calculera la colonne D du tableau "tablo".
Pour tout savoir sur les champs, ici : http://faqword.free.fr/articles.php?lng=fr&pg2
Circé http://faqword.free.fr
Merci pour votre réponse.
Bonjour juliette,
juliette avait soumis l'idée :
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris
qu'utiliser un tableau sous word n'était pas la meilleure solution et
qu'il était préférable d'utiliser excel.
Néanmoins je persiste,
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as
bien compris que la meilleure solution était d'utiliser Excel ?....
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le
tableau donc tout va bien.
Euh... ctrl+A c'est pour tout sélectionner... La mise à jour c'est
F9...
Excepté le fait, que de temps à autres, l'utilisateur du tableau
pourra être amené à insérer de nouvelles lignes, ce qui veut dire
que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par
exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes
sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de
définir la plage de cellules d'un sous-total par un nom (toto) et du
coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la
suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en
ligne.
Ben non, parce que ça ne marche pas comme ça dans Word... Lorsqu'on
donne un nom à une plage dans Word, c'est du texte, ce qui me paraît
logique... Donc, si tu affectes un signet à des cellules en les
sélectionnant, et que tu fais une somme avec ce signet, ce ne sera pas
calculé, puisque ce sera du texte.
Tu ne peux donc faire de calcul qu'avec des références de lignes et de
colonnes, mais comme dans Word les références relatives n'existent pas,
ça ne résout pas ton problème !
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser
"ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total
de la ligne à gauche :
{ =SUM(ABOVE) }
{ =SUM(LEFT) }
Par ailleurs, si tu veux insérer hors tableau un calcul, tu dois
affecter un signet au tableau, puis l'utilisation ensuite dans ton
calcul comme :
{ =SUM (tablo d:d) }
qui calculera la colonne D du tableau "tablo".
Pour tout savoir sur les champs, ici :
http://faqword.free.fr/articles.php?lng=fr&pg2
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste,
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as bien compris que la meilleure solution était d'utiliser Excel ?....
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien. Euh... ctrl+A c'est pour tout sélectionner... La mise à jour c'est
F9...
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Ben non, parce que ça ne marche pas comme ça dans Word... Lorsqu'on donne un nom à une plage dans Word, c'est du texte, ce qui me paraît logique... Donc, si tu affectes un signet à des cellules en les sélectionnant, et que tu fais une somme avec ce signet, ce ne sera pas calculé, puisque ce sera du texte.
Tu ne peux donc faire de calcul qu'avec des références de lignes et de colonnes, mais comme dans Word les références relatives n'existent pas, ça ne résout pas ton problème !
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser "ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total de la ligne à gauche : { =SUM(ABOVE) } { =SUM(LEFT) }
Par ailleurs, si tu veux insérer hors tableau un calcul, tu dois affecter un signet au tableau, puis l'utilisation ensuite dans ton calcul comme : { =SUM (tablo d:d) } qui calculera la colonne D du tableau "tablo".
Pour tout savoir sur les champs, ici : http://faqword.free.fr/articles.php?lng=fr&pg2
Circé http://faqword.free.fr
Merci pour votre réponse.
AB
Bonjour,
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand on peut faire compliqué (persister avec Word) ? Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus de la cellule active, et place le résultat dans cette cellule. La différence avec le formule SUM(ABOVE), réside en ce que la somme se fait même s'il y a des lignes vides (qui sont considérées comme des zéros), ce qui permet d'insérer des lignes, vides ou non, et de pouvoir calculer le résultat quand même. Si ça peut t'être utile... AB
"juliette" a écrit dans le message de news:
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Merci pour votre réponse.
Bonjour,
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand on
peut faire compliqué (persister avec Word) ?
Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus
de la cellule active, et place le résultat dans cette cellule.
La différence avec le formule SUM(ABOVE), réside en ce que la somme se fait
même s'il y a des lignes vides (qui sont considérées comme des zéros), ce
qui permet d'insérer des lignes, vides ou non, et de pouvoir calculer le
résultat quand même.
Si ça peut t'être utile...
AB
"juliette" <Juliette.Frehel@socgen.com> a écrit dans le message de news:
1117785933.894994.248160@g44g2000cwa.googlegroups.com...
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris
qu'utiliser un tableau sous word n'était pas la meilleure solution et
qu'il était préférable d'utiliser excel.
Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et
plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le
tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau
pourra être amené à insérer de nouvelles lignes, ce qui veut dire
que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par
exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes
sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de
définir la plage de cellules d'un sous-total par un nom (toto) et du
coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la
suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en
ligne.
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand on peut faire compliqué (persister avec Word) ? Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus de la cellule active, et place le résultat dans cette cellule. La différence avec le formule SUM(ABOVE), réside en ce que la somme se fait même s'il y a des lignes vides (qui sont considérées comme des zéros), ce qui permet d'insérer des lignes, vides ou non, et de pouvoir calculer le résultat quand même. Si ça peut t'être utile... AB
"juliette" a écrit dans le message de news:
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Merci pour votre réponse.
JièL Goubert
Bonjoir(c) Circé
Le 03/06/2005 11:12 vous avez écrit ceci :
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as bien compris que la meilleure solution était d'utiliser Excel ?....
Voui, je me posais la même question... encore une histoire de clous et de marteau ça... ;-)
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser "ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total de la ligne à gauche : { =SUM(ABOVE) } { =SUM(LEFT) }
J'ajouterais que si l'entête de la colonne ou de la ligne est, par exemple, une année ou resemble à une valeur, elle sera additionné avec les autres valeurs !!!
Mais bon, pourquoi faire simple quand on peut faire compliqué, qui disaient les shadocks
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est la : http://faq.outlook.free.fr/
Bonjoir(c) Circé
Le 03/06/2005 11:12 vous avez écrit ceci :
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as
bien compris que la meilleure solution était d'utiliser Excel ?....
Voui, je me posais la même question... encore une histoire de clous et de
marteau ça... ;-)
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser
"ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total
de la ligne à gauche :
{ =SUM(ABOVE) }
{ =SUM(LEFT) }
J'ajouterais que si l'entête de la colonne ou de la ligne est, par
exemple, une année ou resemble à une valeur, elle sera additionné avec les
autres valeurs !!!
Mais bon, pourquoi faire simple quand on peut faire compliqué, qui
disaient les shadocks
--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
J'ai envie de dire : pffffuiitttt !!!! Pourquoi persistes tu si tu as bien compris que la meilleure solution était d'utiliser Excel ?....
Voui, je me posais la même question... encore une histoire de clous et de marteau ça... ;-)
Les solutions que je vois puisque tu t'entêtes... c'est d'utiliser "ABOVE" pour un total de la colonne du dessus, et "LEFT" pour un total de la ligne à gauche : { =SUM(ABOVE) } { =SUM(LEFT) }
J'ajouterais que si l'entête de la colonne ou de la ligne est, par exemple, une année ou resemble à une valeur, elle sera additionné avec les autres valeurs !!!
Mais bon, pourquoi faire simple quand on peut faire compliqué, qui disaient les shadocks
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est la : http://faq.outlook.free.fr/
AB
Oups ! oublié la macro :
Sub SommeColonneTableau4() If Selection.Information(wdWithInTable) = True Then With Selection 'repérage de la cellule où on veut mettre la formule ligne = .Information(wdStartOfRangeRowNumber) colonne = .Information(wdStartOfRangeColumnNumber) End With acount = ActiveDocument.Range(0, Selection.Range.End).Tables.Count
ActiveDocument.Tables(acount).Select total = 0 For i = ligne - 1 To 1 Step -1 'balayage des cellules au dessus ActiveDocument.Tables(acount).Cell(i, colonne).Select GoSub Nettoyage
total = total + Val(Selection) Next i
100: ActiveDocument.Tables(acount).Cell(ligne, colonne).Select Selection.Delete 'enlever le résultat précédent Selection.InsertAfter (total) GoTo fin Else MsgBox "Mettre le point d'insertion dans un tableau" End If
Nettoyage: Terme1 = Asc(Selection) If 47 < Val(Terme1) < 58 Then Selection.Find.Execute Findtext:=",", replacewith:=".", Replace:=wdReplaceAll Selection.Find.Execute Findtext:="^w", replacewith:="", Replace:=wdReplaceAll Selection.Find.Execute Findtext:="^s", replacewith:="", Replace:=wdReplaceAll ActiveDocument.Tables(acount).Cell(i, colonne).Select Else: Return End If Return
fin: End Sub
"AB" a écrit dans le message de news: %23jaC2$
Bonjour,
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand on peut faire compliqué (persister avec Word) ? Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus de la cellule active, et place le résultat dans cette cellule. La différence avec le formule SUM(ABOVE), réside en ce que la somme se fait même s'il y a des lignes vides (qui sont considérées comme des zéros), ce qui permet d'insérer des lignes, vides ou non, et de pouvoir calculer le résultat quand même. Si ça peut t'être utile... AB
"juliette" a écrit dans le message de news:
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.
Merci pour votre réponse.
Oups ! oublié la macro :
Sub SommeColonneTableau4()
If Selection.Information(wdWithInTable) = True Then
With Selection 'repérage de la cellule où on veut mettre la formule
ligne = .Information(wdStartOfRangeRowNumber)
colonne = .Information(wdStartOfRangeColumnNumber)
End With
acount = ActiveDocument.Range(0, Selection.Range.End).Tables.Count
ActiveDocument.Tables(acount).Select
total = 0
For i = ligne - 1 To 1 Step -1 'balayage des cellules au
dessus
ActiveDocument.Tables(acount).Cell(i, colonne).Select
GoSub Nettoyage
total = total + Val(Selection)
Next i
100:
ActiveDocument.Tables(acount).Cell(ligne, colonne).Select
Selection.Delete 'enlever le résultat précédent
Selection.InsertAfter (total)
GoTo fin
Else
MsgBox "Mettre le point d'insertion dans un tableau"
End If
Nettoyage:
Terme1 = Asc(Selection)
If 47 < Val(Terme1) < 58 Then
Selection.Find.Execute Findtext:=",", replacewith:=".",
Replace:=wdReplaceAll
Selection.Find.Execute Findtext:="^w", replacewith:="",
Replace:=wdReplaceAll
Selection.Find.Execute Findtext:="^s", replacewith:="",
Replace:=wdReplaceAll
ActiveDocument.Tables(acount).Cell(i, colonne).Select
Else: Return
End If
Return
fin:
End Sub
"AB" <spamophobe1@marseille.com> a écrit dans le message de news:
%23jaC2$FaFHA.2788@TK2MSFTNGP12.phx.gbl...
Bonjour,
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand
on peut faire compliqué (persister avec Word) ?
Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus
de la cellule active, et place le résultat dans cette cellule.
La différence avec le formule SUM(ABOVE), réside en ce que la somme se
fait même s'il y a des lignes vides (qui sont considérées comme des
zéros), ce qui permet d'insérer des lignes, vides ou non, et de pouvoir
calculer le résultat quand même.
Si ça peut t'être utile...
AB
"juliette" <Juliette.Frehel@socgen.com> a écrit dans le message de news:
1117785933.894994.248160@g44g2000cwa.googlegroups.com...
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris
qu'utiliser un tableau sous word n'était pas la meilleure solution et
qu'il était préférable d'utiliser excel.
Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et
plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le
tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau
pourra être amené à insérer de nouvelles lignes, ce qui veut dire
que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par
exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes
sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de
définir la plage de cellules d'un sous-total par un nom (toto) et du
coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la
suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en
ligne.
Sub SommeColonneTableau4() If Selection.Information(wdWithInTable) = True Then With Selection 'repérage de la cellule où on veut mettre la formule ligne = .Information(wdStartOfRangeRowNumber) colonne = .Information(wdStartOfRangeColumnNumber) End With acount = ActiveDocument.Range(0, Selection.Range.End).Tables.Count
ActiveDocument.Tables(acount).Select total = 0 For i = ligne - 1 To 1 Step -1 'balayage des cellules au dessus ActiveDocument.Tables(acount).Cell(i, colonne).Select GoSub Nettoyage
total = total + Val(Selection) Next i
100: ActiveDocument.Tables(acount).Cell(ligne, colonne).Select Selection.Delete 'enlever le résultat précédent Selection.InsertAfter (total) GoTo fin Else MsgBox "Mettre le point d'insertion dans un tableau" End If
Nettoyage: Terme1 = Asc(Selection) If 47 < Val(Terme1) < 58 Then Selection.Find.Execute Findtext:=",", replacewith:=".", Replace:=wdReplaceAll Selection.Find.Execute Findtext:="^w", replacewith:="", Replace:=wdReplaceAll Selection.Find.Execute Findtext:="^s", replacewith:="", Replace:=wdReplaceAll ActiveDocument.Tables(acount).Cell(i, colonne).Select Else: Return End If Return
fin: End Sub
"AB" a écrit dans le message de news: %23jaC2$
Bonjour,
Comme te le rappelle Circé, pourquoi faire simple (utiliser Excel) quand on peut faire compliqué (persister avec Word) ? Néanmoins...la macro ci-dessous fait la somme des nombres situés au dessus de la cellule active, et place le résultat dans cette cellule. La différence avec le formule SUM(ABOVE), réside en ce que la somme se fait même s'il y a des lignes vides (qui sont considérées comme des zéros), ce qui permet d'insérer des lignes, vides ou non, et de pouvoir calculer le résultat quand même. Si ça peut t'être utile... AB
"juliette" a écrit dans le message de news:
Bonjour
Après avoir parcouru très attentivement le site, j'ai bien compris qu'utiliser un tableau sous word n'était pas la meilleure solution et qu'il était préférable d'utiliser excel. Néanmoins je persiste, et j'ai donc mon tableau à plusieurs lignes et plusieurs colonnes, des sous-totaux et même un total des sous-totaux!
J'ai appris sur le site l'existence de Ctrl A pour mettre à jour le tableau donc tout va bien.
Excepté le fait, que de temps à autres, l'utilisateur du tableau pourra être amené à insérer de nouvelles lignes, ce qui veut dire que mes sous-totaux qui sont définis de manière fixe (SUM(b1:b6) par exemple) n'intégrent pas la cellule supplémentaire. Donc les sommes sont fausses.
Je voulais savoir s'il existe comme sous excel la possibilité de définir la plage de cellules d'un sous-total par un nom (toto) et du coup écrire ma formule SUM (toto)qui s'adapterai à l'ajout ou la suppression de lignes. Je ne vois rien qui y ressemble dans l'aide en ligne.