Discussion :

[kyopis]

Bonjour,

J'ai un problème relativement simple,

Voici le code de mon bouton :

Code vb :

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

1
2
3
4
5
Sub word()
    Set wordapp = CreateObject("word.Application")
    wordapp.Visible = True
    wordapp.Documents.Open ("T:\Base access\Word\Doc1.docm")
End Sub

Il est censé ouvrir un doc word et le mettre au 1er plan.

Mais il ne ce met pas au premier plan.
Et soucis plus important, ce docs word comporte un publipostage en relation avec le classeur dans le quelle ce bouton est. Mais le docs word s'ouvre comme si il n'y avais pas de publipostage.

Tandis que si je l'ouvre manuellement, il s'ouvre avec une box me demandant de confirmer mon sql et affiche bel est bien mon publipostage.

Avez-vous une solution !

Merci !

[joe.levrai]

Bonjour,

si tu actives l'application word, elle ne passe pas au premier plan ?

Code :

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

wordapp.Activate

pour le souci de publipostage, regarde si l'activation ne résoud pas l'affaire. Sinon, il faudra peut-être générer toi-même dans ta procédure l'affichage de cette boite de dialogue de "lancement".
Désolé, je n'ai jamais publiposté donc je ne peux donner un conseil plus avisé.

[kyopis]

Bonjour,

Il passe bien au premier plan, mais cela ne règle pas mon soucis de publipostage.

Quand le word s'ouvre la boite de dialogue n'apparait pas.

Tandis que si je l'ouvre manuellement la boite de dialogue apparait.

Merci de votre retour.

[joe.levrai]

Alors peut-être qu'il faudra l'appeler dans la procédure ?

quelle est cette fenêtre de boite de dialogue ? Si tu veux l'appeler manuellement dans ton fichier word, tu passes par quel menu ? Ceci nous permettrait de la retrouver dans le modèle objet VBA pour la piloter ?

[clementmarcotte]

Bonjour,

Bonjour,

Tandis que si je l'ouvre manuellement la boite de dialogue apparait.

Merci de votre retour.

Ta boîte de dialogue apparaît quand ? Est-ce quand tu ouvres Word ou quand tu cliques sur l'onglet "Publipostage" ? Parce que là, il s'agit de deux choses différentes.

Si ta boîte de dialogue s'ouvre au lancement de Word, cela ressemble à une procédure d'événement liée au lancement du document. Sinon, Word s'ouvre automatiquement sur le volet Accueil du Ruban.
Si ta boîte de dialogue s'ouvre en cliquant sur l'onglet, c'est probablement dû à un événement lié au Ruban ou à la conception de l'assistant publipostage.

[kyopis]

Bonjour,

Voici la boite de dialogue en question :


Elle s'ouvre a l'ouverture du document word avant même de voir le doc proprement dit.

Je pense que le sql en question pointe mon document excel qui contient le code cité précédemment.

Je précise également que dans ce document excel il y a une extraction "lié" de ma base access.
Ainsi qu'un bouton :

Code :

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

1
2
3
4
5
6
7
Sub FIltre()
 Range("A18:V100").AdvancedFilter _
         Action:=xlFilterCopy, _
         CriteriaRange:=Range("A1:A2"), _
         CopyToRange:=Range("A101:V200"), _
         Unique:=False
End Sub

Qui permet d'extraire pour le publipostage seulement le ou les clients voulu.

Le sql du doc word pointe vers cette extraction.

Merci de votre aide.

[kyopis]

Bonjour,

Je me permet de signaler que je n'ai pas trouvé de solution.

Si quelqu'un a une idée je suis preneur pour résoudre ou contourner le problème .

Cordialement.