Msgbox Chemin

Mode Backstage (Onglet Fichier), Options, Options avancées, Options d'édition => Utiliser le curseur intelligent.

ou bien pour Word 2007 :  Bouton Office, Options Word, Options avancées, Options d'édition => Utiliser le curseur intelligent

Explication pratique :

• Prenez un document de plusieurs pages et positionnez le curseur au début du document.
• Faites défiler votre document à l'aide de l'ascenseur
• Utilisez ensuite une flèche de direction pour aller plus haut, plus bas, à droite ou à gauche

Si l'option Utiliser le curseur intelligent est cochée, le curseur apparaîtra automatiquement à la page où vous vous êtes arrêté, qui deviendra donc la page active.

Si  l'option Utiliser le curseur intelligent n'est pas cochée, vous remonterez directement là où vous aviez laissé le curseur, à savoir à la première page.

Dans les marques de format, décocher toutes les options sauf l'option "toutes" : effectivement, quand ces options sont sélectionnées, inutile de cliquer sur le bouton masquer/afficher pour voir les marques.

Mode Backstage (onglet Fichier)
Options, Affichage, rubrique Toujours afficher ces marques à l'écran

 Public Sub AfficheNomSignet()
'Code écrit par Guy Moncomble 2002
Dim varSignet As Bookmark
Application.ScreenUpdating = False
For Each varSignet In ActiveDocument.Bookmarks
ActiveDocument.Comments.Add Range:=varSignet.Range,
Text:=varSignet.Name
Next varSignet
Application.ScreenUpdating = True
End Sub

Public Sub AfficheCodeChamp()
'Code écrit par Guy Moncomble 2002
Dim varSignet As Bookmark, txtCom As String
Application.ScreenUpdating = False
For Each varSignet In ActiveDocument.Bookmarks
If varSignet.Range.Fields.Count > 0 Then
txtCom = varSignet.Name & " : " & varSignet.Range.Fields(1).Code.Text
Else
txtCom = varSignet.Name
End If
ActiveDocument.Comments.Add Range:=varSignet.Range, Text:=txtCom
Next varSignet
Application.ScreenUpdating = True
End Sub

Il est très simple d'insérer dans un document Word une adresse provenant de ses contacts Outlook. Il suffit pour cela d'ajouter le bouton Carnet d'adresse sur une barre d'outils.

• Cliquez sur la flèche située à l'extrême droite de la barre d'outils Accès rapide et choisissez la commande Autres commandes
• En haut, dans la liste déroulante Catégories, choisissez Commandes non présentes sur le ruban
• Sélectionnez la commande Carnet d'adresses et cliquez sur le bouton Ajouter puis sur OK.

Il suffit maintenant de cliquer sur ce bouton Carnet d'adresses que vous venez d'ajouter pour accéder à vos contacts Outlook et pour insérer une adresse dans votre document.

Cependant, la table des matières n'est pas forcément placée au début. Dans ce cas, la solution la plus simple est d'ajouter à la barre d'outils un bouton permettant d'accéder à la table des matières.

Pour cela :

• Cliquez sur la flèche déroulante située à la droite de la barre d'outils et choisissez Personnaliser... 
• Cliquez sur la flèche déroulante des catégories de commande et sélectionnez Commandes non présentes sur le ruban.
• Sélectionnez la commande Atteindre la table des matières puis cliquez sur Ajouter.
• Cliquez sur OK pour quitter les options.

Il vous suffira désormais de cliquer sur le bouton que vous venez d'ajouter pour atteindre rapidement la table des matières.

• l'une pour comparer deux versions d'un même document
• l'autre pour combiner les révisions de plusieurs auteurs faites dans plusieurs versions d'un document.

On peut également utiliser l'option "Afficher en côte à côte" : onglet Affichage, groupe Fenêtre.

Insérez un champ qui soustrait le nombre de caractères sans les espaces du nombre total de caractères espaces compris :

{={DOCPROPERTY "CharactersWithSpaces" } - {{DOCPROPERTY "Characters" }}