Discussion :

[Uranne-jimmy]

Bonjour,
C'est une problème bête mais j'arrive pas a m'en sortir pour autant : j'ai un signet, qui me sert de point de départ pour coller tout un tas d'info dans un ordre précis, pour que ça apparaisse dans le même ordre. Pour ça je me suis dit : ba je selection mon signet, moveleft count = 1 et hop ! sauf qu'il bloque sur la ligne qui fait le mouvement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
doc.range.bookmarks.item("monsignet").range.select
selection.moveleft unit:=wdcharacters count:=1

Désolé pour le code sans respect de la case, je suis loin du pc qui me permet de coder (on a qu'un seul pc dans la boite qui a internet, je suis le seul codeur, oui c'est lourd, mais vous connaissez les bureaucrates ...)

[Heureux-oli]

Salut,

Perso, avant un move, je fais un collapse.

Voilà un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
ActiveDocument.Bookmarks("S1").Range.Select
Selection.Collapse direction:=wdCollapseStart
Selection.MoveLeft unit:=wdCharacter, Count:=1
 
Selection.TypeText "o"

[Uranne-jimmy]

Bonjour,
Merci pour ton aide, malgré ça j'ai l'erreur qui est invoqué encore une fois, cette fois si sur la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Selection.Collapse direction:=wdCollapseStart

Donc je pense que j'ai un problème sur ma sélection directement, mais sans l'intellisense et sans net, j'avoue avoir du mal à faire quelque chose de correct. J'essaye ta version de sélection du signet sans succès ... Je sais plus trop ce que je peux modifier il n'y a que deux lignes O.o

[Heureux-oli]

Salut,

Comment déclares-tu tes objets dans ton projet ?
Le code que je poste est un copier coller de mon VBE.
Je suis certain qu'il fonctionne.

[Uranne-jimmy]

Je ne comprend pas la question ^^'. Dans la partie qui coince, il n'y a pas vraiment d'objet, je vais chercher un bookmark dont je suis sûr du nom (orthographe), je le sélectionne et j'applique ensuite une modification de la sélection. Le seul objet ici serait le document ? je travail depuis une macro excel donc j'ai du récupéré un document qui me sert de modèle.

Voici une copie de cette partie qui coince, sans rien omettre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
...
Set doc = WordApp.Documents.open("monfichier.doc")
...
doc.Bookmarks("graph").range.select
Selection.Collapse direction:=wdCollapseStart

[Heureux-oli]

Salut,

Par objet, on entend l'application Word, Early ou LateBinding; le document qui est aussi un objet.

[Uranne-jimmy]

Je comprends mieux ^^ Je ne connaissais pas les termes définissant cette notion de binding.
Cette fois ci, j'ai étais sage et j'ai d'abord déclarer correctement ma variable doc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim doc as Document

Si c'est ce qu'il fallait faire du moins ...
La suite je l'ai déjà partagé à mon post précédent.

[Heureux-oli]

Salut,

Et l'application ?

Le code que j'ai donné fonctionne chez moi, ce n'est donc pas une question d'écriture, mais je pense à une question de bibliothèque.

[Uranne-jimmy]

D'accord, voilà :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim WordApp As New Word.Application
Dim doc AS Word.Document
Set WordApp = Create Object("Word.Application")

La référence Microsoft Office 14.0 Object Library est bien coché, si c'est ce que tu pourrais voir comme problème de bibliothèque. Ou alors un conflit entre le select de excel est celui de word ? Ca marcherait si je faisais doc.selection au lieu de selection ?

[Uranne-jimmy]

Bon c'était effectivement ça (ou presque) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

WordApp.selection. ...

Voilà voilà ... faites gaf quand vous utilisez plusieurs outils de microsoft office en même temps @.@

Merci beaucoup !

[Heureux-oli]

Salut,

Ca ne pose pas de problème d'utiliser plusieurs bibliothèques en même temps.
Le tout est de le faire correctement.
Pour ne pas faire d'erreur dans l'écriture du code, il est plus simple de travailler en EarlyBinding.

[Uranne-jimmy]

Le EarlyBinding était fait, dans ce cas là, j'ai juste oublié à quel point les deux librairies, pour excel et pour word, sont proche, au point de proposer des éléments identique. Désormais je préciserais toujours l'application d'où provient l'objet ^^
Ce n'est pas que ça pose problème d'utiliser plusieurs bibliothèque, mais ça demande une gymnastique différente que je n'ai pas eu d'instinct. Vb.net est bien pour ça, il nous impose de préciser la bibliothèque source quand on contrôle des applications.

Merci beaucoup en tout cas, j'ai réussi à finaliser une macro qui, outre ce soucis, commençait à prendre pas mal de temps.