Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Word tableau dans WORD 2000 : aidez-moi svp, c'est urgent!

tableau dans WORD 2000 : aidez-moi svp, c'est urgent!

18 réponses
Avatar
cristina94350
Bonjour tout le monde. C'est la premi=E8re fois que je viens=20
par ici et j'esp=E8re trouver une solution =E0 mon probl=E8me...=20
j'ai d=E9j=E0 fait une recherche pour =E9viter de reposer des=20
questions en double mais je n'ai pas trouv=E9 de r=E9ponse =E0=20
ma question! alors voil=E0, je ne m'y connais pas trop mais=20
je pense que c'est faisable...

-> j'ai cr=E9e un tableau dans Word2000 pour g=E9rer les=20
d=E9pots de ch=E8ques de mes clients:
...1=E8re colonne =3D code client
...2=E8me colonne =3D nom client
--> =E0 part j'ai mon logiciel de gestion (ciel) avec mon=20
fichier clients que je peux copier pour coller o=F9 j'en=20
aurais besoin...
--->je veux faire en sorte que quand je tappe le code=20
client dans la premi=E8re colonne le nom s'affiche=20
automatiquement dans la deuxi=E8me...
----> COMMENT FAIRE? PAR OU COMMENCER?? COMMENT PROCEDER???

>>> j'ai d=E9j=E0 essay=E9 de cr=E9er une base de donn=E9es en=20
copiant mon ficheir clients dans une page WORD pour=20
l'associer avec mon tableau mais je n'ai pas obtenu de=20
r=E9sultat!!!

>>> j'attends vos r=E9ponses avec impatience!!

>>> merci d'avance, cristina.
Signaler un problème avec ce contenu

8 réponses

Supprimer
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
1 2
Avatar
geo
Bonjour à tous

Je ne vois pas comment déclencher la mise à jour de
cellules sur une simple saisie, il faut au moins cliquer
sur un bouton, ou faire une userform de saisie.

Ou alors passer tout le fichier client en insertion
automatique.

A+
Avatar
Dédé
Salut à tous !

OK alors on va commencer par savoir pourquoi cette macro ne fonctionne pas
...

Sub test()
If ActiveDocument.Tables(1).Cell(2, 1).Range.Text = "Test" Then
ActiveDocument.Tables(1).Cell(2, 2).Range.Text = "Test1"
End If
End Sub

J'ai fais un petit tableau et quand j'ai entrer la valeur "Test" dans la
cellule B2 ben j'aimerais que dans la cellule A2 il y ait le mot "Test1" ...
Mais bon, ça marche pas et je sais pas trop pouruqoi ...

Si je fais uniquement
ActiveDocument.Tables(1).Cell(2, 1).Range.Text = "Test"
ça me met bien la valeur "Test" dans la cellule B2 mais après, j'arrive pas
à faire tester cette cellule ...

Est-ce que quelqu'un pourrait me donner des explications ?

Merci d'avance
Dédé
--
Pour répondre, enlever les lettres N O S P A M

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Dédé" a écrit dans le message de
news:%
tu dis "dans le mur " ? ;-)

ben c'est vrai, j'avoue que avecuniquement Word, j'aurrais bien de la
peine

mais on va tenter d'y trouver une solution ;-)) et avec le sourire ;-))

J'ai encore pas mal de boulot ces temps vu que je termine mon contrat de
travail à la fon novembre et pi après, je sais pas comment je vais pouvoir
faire pour continuer à venir sur le MPFW ou le MPFW vu que c'est devenu,
avec le temps, presque une nécessité ;-)) un peu accro ;-))

M'enfin, j'vais voir dans mes moments creux comment je pourrais faire cela
;-))

Salutations
Dédé

--
Pour répondre, enlever les lettres N O S P A M

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1

Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Geo" a écrit dans le message de
news:
Bonsoir Dédé,



Ta base de données, elle se trouve dans Excel ou Access ?


Là Dédé tu vas au piquet.

Christina t'a dit qu'elle n'avait pas Acces ni Excel et qu'elle devait
se débrouiller en word.


--

A+











Avatar
geo
Bonjour Dédé

Une piste, ajoute le code suivant :
Debug.Print Len(ActiveDocument.Tables(1).Cell(2,
1).Range.Text)

Et après tu vas faire un tour dans la faq et regarde les
vba de traitement des tableaux pour t'aider à comprendre
pourquoi tu as 6 et non 4 comme résultat.

A+
Avatar
cristina94350
heuh, il a a deux sujets mélangés là, non??!! :o/

bref, pour ce qui est de mon cas, oui c'est faisable avec
word puisque j'ai déjà fait une tentative il y a quelque
temps, sauf que je n'avais pas bien fait le truc et du
coup ça n'avait pas bien marché... je vais essayer de
refaire dès que j'ai le temps pis si j'y arrive je vous le
dis!! bonne journée vous tous!


-----Message d'origine-----
Bonjour Dédé

Une piste, ajoute le code suivant :
Debug.Print Len(ActiveDocument.Tables(1).Cell(2,
1).Range.Text)

Et après tu vas faire un tour dans la faq et regarde les
vba de traitement des tableaux pour t'aider à comprendre
pourquoi tu as 6 et non 4 comme résultat.

A+


.



Avatar
geo
Bonjour

-----Message d'origine-----
heuh, il a a deux sujets mélangés là, non??!! :o/


Possible,
mais j'ai l'impression que Dédé essaie de te bâtir une
solution en vba,
et qu'il rencontre quelques difficultés.

A+

Avatar
Dédé
juste ! mais le problème c'est que le VBA avec Word, ben j'maitrise pas
vraiment ...
Note que c'est comme ça que j'ai plus ou moins appris avec Excel ... mais ça
a pris du temps ;-))

autrement ben j'vais voir avec les champs calculés et envoie un exemple à
Cristina quand j'aurrais fini ...

@ +

Salutations
Dédé

--
Pour répondre, enlever les lettres N O S P A M

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"geo" a écrit dans le message de
news:0a9601c39e08$650fb100$
Bonjour

-----Message d'origine-----
heuh, il a a deux sujets mélangés là, non??!! :o/


Possible,
mais j'ai l'impression que Dédé essaie de te bâtir une
solution en vba,
et qu'il rencontre quelques difficultés.

A+

Avatar
Anacoluthe
Bonjour !

"Dédé" nous a écrit ...
ActiveDocument.Tables(1).Cell(2, 1).Range.Text = "Test"
ça me met bien la valeur "Test" dans la cellule B2 mais après,
j'arrive pas à faire tester cette cellule ...
Est-ce que quelqu'un pourrait me donner des explications ?


Dédé a des problèmes avec le contenu d'une cellule Word en VBA.

Tu n'es pas le premier, c'est un piège bien connu de word-vba !
Je t'explique : regarde une cellule de tableau Word,
tu vois ce drôle de caractère séparateur ¤ ?
N'oublie pas que quoi que tu fasses, il restera dans la cellule !
Si tu places 'test' dans une cellule, tu auras alors 'test¤'
Et le plus tordu c'est que ce simple ¤ compte pour 2 caractères
( chr(13 et chr(7) ) . Donc quand tu lis une cellule en vba,
pense toujours à éliminer ces 2 derniers caractères...

Bonne continuation, Dédé !

Anacoluthe
« Fréquente avec amour la cellule,
si tu veux être introduit dans le cellier à vin. »
- Thomas D'AQUIN

Avatar
Dédé
haaaaa bonnnnn ....

Merci pour l'info, mon clavier commence légèrement à souffrir ;-((

Je continue et sitôt que je trouve quelque chose, je vous redis ;-))

À noter, que si c'est vraiment URGENT comme décrit dans l'en-tête, je
maintient "EXCEL !!"

Salutations
Dédé

--
Pour répondre, enlever les lettres N O S P A M

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Anacoluthe" a écrit dans le message de
news:
Bonjour !

"Dédé" nous a écrit ...
ActiveDocument.Tables(1).Cell(2, 1).Range.Text = "Test"
ça me met bien la valeur "Test" dans la cellule B2 mais après,
j'arrive pas à faire tester cette cellule ...
Est-ce que quelqu'un pourrait me donner des explications ?


Dédé a des problèmes avec le contenu d'une cellule Word en VBA.

Tu n'es pas le premier, c'est un piège bien connu de word-vba !
Je t'explique : regarde une cellule de tableau Word,
tu vois ce drôle de caractère séparateur ¤ ?
N'oublie pas que quoi que tu fasses, il restera dans la cellule !
Si tu places 'test' dans une cellule, tu auras alors 'test¤'
Et le plus tordu c'est que ce simple ¤ compte pour 2 caractères
( chr(13 et chr(7) ) . Donc quand tu lis une cellule en vba,
pense toujours à éliminer ces 2 derniers caractères...

Bonne continuation, Dédé !

Anacoluthe
« Fréquente avec amour la cellule,
si tu veux être introduit dans le cellier à vin. »
- Thomas D'AQUIN




1 2