Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/02/2007, 19h44   #1
Invité régulier
 
Inscription : juin 2006
Messages : 17
Détails du profil
Informations forums :
Inscription : juin 2006
Messages : 17
Points : 6
Points : 6
Par défaut VBA word - ouvrir doc page x

Bonjours à tous, amis programmeurs (euses). Je sais qu'il est possible de faire cela avec signet el lien dans word, mais j'ai vraiment besoin de cette manière.

Pour faire un portrait de la situation : J'ai une forme qui joue le role de table des matières de mon document qui s'ouvre automatiquement dès l'ouverture du document. J'aimerais qu'au clic de la "LblNotes" la forme se ferme et que le document s'ouvre sur la page ou y'a le signet (BkmNotes), ou encore la page que j'ai présélectionné dans vba. Vous voyez ou je veux en venir???


Code :
1
2
3
4
5
6
7
8
9
10
Private Sub LblNotes_Click()
 
   ' Ferme la forme.
   Me.Hide
 
   ' Set le document sur la page sélectionnée.
 
   ' C'est ici que le code que je recherche doit se placer...
 
End Sub
Un gros merci à tout le monde pour votre temps et connaissance.
TIREUR est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/02/2007, 22h27   #2
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Regarde à goto et bookmark dans l'aide
Code :
    ActiveDocument.GoTo What:=wdGoToBookmark, Name:="BkmNotes"
A+
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 25/02/2007, 16h44   #3
Invité régulier
 
Inscription : juin 2006
Messages : 17
Détails du profil
Informations forums :
Inscription : juin 2006
Messages : 17
Points : 6
Points : 6
Par défaut Voici ce que j'ai trouvé aussi:

Un gros merci à toi ouskel'n'or. Je vais prendre ta solution, elle semble moins tordue que la mienne! Mais pour les intéressés (les deux fonctionnent). Celle de ouskel'n'or sélectionne le premier champs de la page du signet. La mienne, le champs codé avec le signet.

Code :
1
2
3
4
5
6
7
8
9
10
 
Private Sub LblNotes_Click()
 
   ' Ferme la forme.
   Me.Hide
 
   ' Set le document sur la page sélectionnée.
   ThisDocument.FormFields("BkmNotes").Select
 
End Sub
Bon dimanche à tous.
TIREUR est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 08h27.


 
 
 
 
Partenaires

Hébergement Web