OVH Cloud OVH Cloud

1500 caractères

9 réponses
Avatar
szervusz
Bonsoir.

Existe-t-il un système permettant à bloquer le nombre de caracteres que doit
contenir une page word ? Ni plus, ni moins, juste 1500.
Merci par avance pour vos lumières.

szervusz.

9 réponses

Avatar
PanZzaNni
Salut,

Dans Affichage>Barre d'outils> Statistiques, Word calcul le nombre de
caractères. Mais si tu veux empêcher la saisie après 1500 caractères, je ne
sais pas comment on fait...

@+

"szervusz" a écrit dans le message de news:
e$
Bonsoir.

Existe-t-il un système permettant à bloquer le nombre de caracteres que
doit
contenir une page word ? Ni plus, ni moins, juste 1500.
Merci par avance pour vos lumières.

szervusz.




Avatar
Dédé
Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel mais
pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?

Merci d'avance
Salutations
Dédé

"PanZzaNni" a écrit dans le message de
news:
Salut,

Dans Affichage>Barre d'outils> Statistiques, Word calcul le nombre de
caractères. Mais si tu veux empêcher la saisie après 1500 caractères, je
ne

sais pas comment on fait...

@+

"szervusz" a écrit dans le message de news:
e$
Bonsoir.

Existe-t-il un système permettant à bloquer le nombre de caracteres que
doit
contenir une page word ? Ni plus, ni moins, juste 1500.
Merci par avance pour vos lumières.

szervusz.








Avatar
Jean-Guy Marcil
Dédé was telling us:
Dédé nous racontait que :

Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel
mais pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?



Il faut ajouter des modules de classe et écrire le code car les événements
ne sont pas dans le module de classe de base (ThisDocument) comme ils sont
en Excel.

Voir
http://tinyurl.com/5w5jy

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org

Avatar
Rodolphe
Et en français ça donne quoi?

"Jean-Guy Marcil" a écrit dans le message de news:
eC9q%
Dédé was telling us:
Dédé nous racontait que :

Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel
mais pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?



Il faut ajouter des modules de classe et écrire le code car les événements
ne sont pas dans le module de classe de base (ThisDocument) comme ils sont
en Excel.

Voir
http://tinyurl.com/5w5jy

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org




Avatar
szervusz
Vous êtes tous, bien trop savants pour moi. S'il vous plaît, traduisez vos
propos, pour que l'utilisateur lambda de mon espèce, puisse comprendre et
mettre en pratique ce que vous préconisez.
Merci encore pour votre aide.
Bonne journée.

szervusz.


"Rodolphe" a écrit dans le message de news:
41bea859$0$28640$
Et en français ça donne quoi?

"Jean-Guy Marcil" a écrit dans le message de news:
eC9q%
Dédé was telling us:
Dédé nous racontait que :

Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel
mais pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?



Il faut ajouter des modules de classe et écrire le code car les
événements


ne sont pas dans le module de classe de base (ThisDocument) comme ils
sont


en Excel.

Voir
http://tinyurl.com/5w5jy

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org








Avatar
Jean-Guy Marcil
Rodolphe was telling us:
Rodolphe nous racontait que :

Et en français ça donne quoi?



Désolé, mais je n'ai pas trouvé une page en français qui contient autant de
détails et qui est écrite pour Word.

Il y a bien:
http://tinyurl.com/5utvv

Mais je trouve que c'est moins approprié car c'est plus théorique et ne
s'applique pas directement à Word.

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org

Avatar
JièL Goubert
Bonjoir(c) szervusz

une solution plus simpliste avec tout les inconvénient qu'elle comporte :
créer une zone de texte avec la barre d'outils formulaire, limiter celle
ci a 1500 caractères dans les propriétés et vérouiller le doc...

reviens si tu as besoin d'autre précisions sur ceci.

--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est la : http://faq.outlook.free.fr/
*** ENQUETE SUR LES NEWSGROUPS MICROSOFT FRANCOPHONES ***
http://collecxia.microsoft.fr/formulaires/forms/enquetenewsgroupfy04/

Le 14/12/2004 11:20 vous avez écrit ceci :
Vous êtes tous, bien trop savants pour moi. S'il vous plaît, traduisez vos
propos, pour que l'utilisateur lambda de mon espèce, puisse comprendre et
mettre en pratique ce que vous préconisez.
Merci encore pour votre aide.
Bonne journée.

szervusz.


"Rodolphe" a écrit dans le message de news:
41bea859$0$28640$

Et en français ça donne quoi?

"Jean-Guy Marcil" a écrit dans le message de news:
eC9q%

Dédé was telling us:
Dédé nous racontait que :


Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel
mais pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?



Il faut ajouter des modules de classe et écrire le code car les



événements

ne sont pas dans le module de classe de base (ThisDocument) comme ils



sont

en Excel.

Voir
http://tinyurl.com/5w5jy

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org












Avatar
Jean-Guy Marcil
szervusz was telling us:
szervusz nous racontait que :

Vous êtes tous, bien trop savants pour moi. S'il vous plaît,
traduisez vos propos, pour que l'utilisateur lambda de mon espèce,
puisse comprendre et mettre en pratique ce que vous préconisez.
Merci encore pour votre aide.
Bonne journée.



En bref la réponse est qu'il n'esixte pas de moyen facile.

Il faut passer par du VBA (programmation).

Il reste à choisir entre du code pour détecter ce qu l'utilisateur fait
pendant qu'il travaille avec le document (la discussin qui précede) ou en
appliquant du code à l'enregistrement du document et automatiquement
éliminer tout ce qui dépasse le 1500e caractère. Si en plus tu parles de
limiter l'utilisateur à 1500 caractères par page (et non dans le document,
alors là, ça ce complique drôlement!

Il y a un moyen facile de limiter l'utilsateur à 1500 caractères dans le
document au complet (et non par page, sinon il faudra du code), mais je ne
sais pas si ça va te plaire:

Utilise un champ de formulaire de type texte et limite sa capacaité à 1500
caractères. Mais à partir de ce moment le document devra être en mode
formulaire, ce qui limite l'utilisateur car beaucoup de fonctions/outils de
Word ne seront plus fonctionels.

Si tu expliquais ton cas un peu plus, peut-être que quelqu'un aura une
alternative à te suggérer.

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP

Word MVP site: http://www.word.mvps.org

Avatar
PanZzaNni
Je ne crois pas que ça existe...

svervusz, pourrais-tu nous dire à qui est destiné ce document... Si tu dois
voir si il contient plus de 1500 caractères ou empêcher qu'ils contiennent
plusieurs caractères...

Merci

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

Salut PanZzaNni !

Ben voilà ce que j'ai pu faire avec mon ignorance de VBA ...

Sub test()
If ActiveDocument.Characters.Count > 1500 Then
MsgBox "Le nombre de 1500 caractères a été atteint !", vbInformation,
"nombre de caractères"
End If
End Sub

Maintenant, il me faudrait l'équivalent de :
Worksheet_SelectionChange(ByVal Target As Range) dans VBA pour Excel mais
pour Word.
Ceci pour faire activer la macro à chaques insertion de caractères et
contrôler si le nombre souhaité n'est pas atteint ....

Est-ce que quelqu'un pourrait me donner une tite lumière ?

Merci d'avance
Salutations
Dédé

"PanZzaNni" a écrit dans le message de
news:
Salut,

Dans Affichage>Barre d'outils> Statistiques, Word calcul le nombre de
caractères. Mais si tu veux empêcher la saisie après 1500 caractères, je
ne

sais pas comment on fait...

@+

"szervusz" a écrit dans le message de news:
e$
Bonsoir.

Existe-t-il un système permettant à bloquer le nombre de caracteres que
doit
contenir une page word ? Ni plus, ni moins, juste 1500.
Merci par avance pour vos lumières.

szervusz.