Recherche:

J'ai trouvé une nouvelle solution nécéssitant aucune macro, pour mettre à jours des champs dans Word.
Même les champs dans les en-têtes et pieds de page lorsque l'on a plusieurs sections, sont mis à...

:tagcode: Si tu pouvais mettre la balise code, ce serai mieux pour tout le monde ! Parce que là c'est illisible :calim2:

Merci

Et une question bien posée est bien plus utile qu'une pièce jointe...

Âlors j'ai fait ça, suite à la réponse de mercatog. C'est pas la meilleure solution mais ça me va déja bien.


Private Sub Frame1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As...

Merci pour cette réponse.
Effectivement OnKey ne fonctionne pas pour les userforms.

J'ai cependant trouvé une autre "solution" que j'arrive à faire fonctionner à moitié :?


Private Sub...

Bonjour,

j'ai regardé beaucoup d'articles concernant la fonction OnKey, mais je n'arrive toujours pas à l'appliquer à mon utilisation et ça m'énerve !!!

J'ai une userform et lorsque j'effectue...

Voilà finalement j'ai réussi à faire un rechercher/remplacer des sauts de section en sauts de page comme ceci :


With appWord.Selection.Find
.Text = "^b"
.Replacement.Text =...

En réalité comme je veux supprimer les sauts de section, ce serait pour chaque section au lieu de chaque page !

Une solution serait d'aller en fin de chaque page du document et de suprimer le saut de section et ensuite de faire un saut de page.
Je n'arrive pas a faire la programmation mais ce serait genre :
...

Salut,

non aucun changement. Mais je ne comprends pas cette ligne, a quoi elle sert ? :

If Left(oPar.Style, 5) = "Headi" Then

Salut,
merci de ta réponse. La numérotation des pages fonctionne grâce à toi maintenant, mais la numérotation des titres n'est toujours pas bonne.

J'ai essayé d'adapter ton code pour cibler la...

Voilà je dois générer un document de test "général" pour cela j'ai créé des documents "type" pour chaque test à effectuer (Test Vanne, Test Moteur...).

Pour chaque document je fais mon...

Oui l'enregistreur me donne ça :

Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^b"
.Replacement.Text = "^m"
...

Bonjour,
voilà j'aimerais remplacer les sauts de sections de mon document par des sauts de page.

J'ai essayé ça :

For Each myRange In ActiveDocument.StoryRanges
With myRange.Find
...

Bonjour j'effectue un publipostage et je souhaite fusionner des documents "publipostés".

J'ai essayé votre code mais un erreur apparaît sur la ligne
Selection.WholeStory

Message d'erreur : ...

Bonjour,
1 - J'ai un problème, j'effectue un publipostage Access-Word mais je souhaiterai avoir une premiere page unique avec mon champ «Titre» puis pour chacun des champs Nom une nouvelle page....

J'ai réussi à éditer la police dans word de cette manière:

'Applique les paramètre de police à Word
With wApp.Selection
.Font.Name = TypeFonte
.Font.Italic = ItaliqueW
.Font.Bold =...

Bonjour,
j'ai créé un formlaire où l'on génère un document Word.
1. On saisi le texte à écrire dans ce document
2. On sélectionne la police d'écriture + italique, souligné....
3. On génère le...