Se placer en fin de fichier dès l'ouverture

Résolu
craac13 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
shunesburg69 Messages postés 1061 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Y a t-il un moyen de se placer directement en fin de fichier quand on ouvre celui-ci dans openoffice.

Merci d'avance

1 réponse

  1. yclik Messages postés 75 Date d'inscription   Statut Membre Dernière intervention   1 612
     
    Bonjour
    une solution serait de créer une macro avec l'enregistreur de macro en allant à la fin du document avec CTRL+FIN

    Outils>enregistrer une macro
    CTRL+FIN
    bouton "Terminer enregistrement" et enregistrer dans le document

    Ensuite
    Outils>personnaliser>onglet évènement
    sélectionner "Ouvrir un document" et assigner macro précédente

    ci dessous code avec l'enregistreur de macro
    sub Main
    dim document as object
    dim dispatcher as object
    document = ThisComponent.CurrentController.Frame
    dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
    dispatcher.executeDispatch(document, ".uno:GoToEndOfDoc", "", 0, Array())
    end sub
    1
    1. craac13 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
       
      Meric yclik, ca marche parfaitement
      0
    2. shunesburg69 Messages postés 1061 Date d'inscription   Statut Membre Dernière intervention   221
       
      Pour info, sous LibreOffice, à en sauvegardant il mémorise la position du curseur donc si vous enregistrez en étant à la fin du document en le rouvrant vous serez en fin de document à nouveau. L'avantage, pas de macro dans le fichier.
      0