OLE word srollbars

Question

Bonjour a tous,
Apres de longues recherches infructueuse, je m'en remets a vous.

Je suis un train de faire une appli qui permet de modifier les entetes et les pieds de pages 
d'un document word.
La visualisation du document se fait dans un OLE de type word avec le fichier :
    OLE1.CreateLink (App.Path + "	mp\FichierWordModifier.doc")

Je voudrais mettre une scrollbar verticale pour que l'utilisateur 
puisse visualiser le resultat en defilant ligne a ligne.
Sinon 2 bouttons du genre PGsuiv et PGprec mais 
je ne voit pas comment afficher la page 2,3,... dans un OLE type Word

Quelqu'un peut-il m'aider

Merci par avance

David78390 · Answer

P.S j'ai trouvé ca mais ca bug avec un fichier existant:
         OLE1.CreateEmbed "", "Word.Document"
         OLE1.DoVerb vbOLEUIActivate
         OLE1.SizeMode = 1
         With OLE1.object
            .ActiveWindow.DisplayVerticalScrollbar = True
            .ActiveWindow.DisplayHorizontalScrollbar = True
         End With

OLE word srollbars

1 réponse

Votre réponse

Discussions similaires