Enregistrer la position du curseur dans un document et y revenir plus tard

J'ai une macro qui scanne mon document pour Heading 1 styles, et, par conséquent, le curseur est déplacé après le dernier match.

Je suis en train d'essayer de capturer l'emplacement du curseur avant cette analyse se produit, puis retour à la position après qu'il a terminé. Comment puis-je faire cela?

J'ai trouvé cette réponse sur, mais ça ne fonctionne pas (Pas d'erreur, il n'a tout simplement pas faire n'importe quoi.)

Application.ScreenUpdating = False ' Turn screen updates off so the user will not know that the cursor has moved

Dim currentPosition As Long
currentPosition = Selection.Range.Start

{... do stuff here ...}

Selection.Range.Start = currentPosition

Application.ScreenUpdating = True
InformationsquelleAutor David Gard | 2014-10-30
  1. 6
    Dim currentPosition As Range
Set currentPosition = Selection.Range 'pick up current cursor position

' do stuff — cursor gets moved around

currentPosition.Select 'return cursor to original position
    • Merci, ça marche. J'en ai une très petite demande, si vous arriver à connaître la réponse, mais - Même si la sélection reste tel qu'il était avant, l'écran se déplace de sorte que la sélection est en haut de l'écran. Est-il de toute façon à sauvegarder aussi la position de l'écran? Merci.
    • Bonne question... je vous suggère de poster une nouvelle question. Je ne sais pas du haut de ma tête, et vous obtiendrez plus d'attention avec une nouvelle question.
    • Fera, me demandais juste. C'est un peu mesquin, mais je sais que certains utilisateurs d'obtenir effrayé par l'écran "sauts", alors je voudrais juste pour sauver un peu de stress! Merci.
    • La position de défilement: stackoverflow.com/a/30765988/600135
    InformationsquelleAutor Jean-François Corbett
  2. 0

    Vous pouvez également utiliser les signets: 

    Sub test()
    ThisDocument.Bookmarks.Add ("xx")
    {... do stuff here ...}
    ThisDocument.GoTo what:=wdGoToBookmark, Name:="xx"
End Sub
    • Merci pour la suggestion, mais cela ne semble pas fonctionner.
    InformationsquelleAutor Patrick Honorez