Piloter word depuis excel????

Fermé

baborge Messages postés 93 Date d'inscription dimanche 6 juin 2004 Statut Membre Dernière intervention 22 septembre 2012 - 16 juil. 2007 à 03:22
baborge Messages postés 93 Date d'inscription dimanche 6 juin 2004 Statut Membre Dernière intervention 22 septembre 2012 - 16 juil. 2007 à 10:12

Bonsoir à toutes & tous,

Je suis en train de me fabriquer un fichier excel me permettant de gerer du
publipostage depuis une base de données MySQL heberger sur internet

Celui-ci se connect au serveur pour récuperer le fichier provenant de la
base de donnees.
Un formulaire permet de faire une selection dans le fichier (plusieurs
adresse possible) puis propose de choisir un document word pour realiser le
publipostage.
Une fois, le fichier selectionné, je voudrais verifier que le module et le
form sont bien present dans le Doc (sinon récupération de ceux-ci qui sont
enregistrer dans des fichiers: bas et frm).

tous le reste fonctionne tres bien:

le module et le form a creer sur le document word, permettent de creer le
lien Publiposage avec le fichier Excel, creer un barre d'outil spécifique,
permettant de simplifier le publipostage (insertion champ de fusion,
previsualisation et lancement de la fusion)

La question que je me pose:

Comment faire la verification depuis Excel, et comment importer le module et
le form dans le document Word, si ils ne sont pas present?

ou

puis-je utiliser les fichier directement dans les fichier BAS et FRM et comment?

Merci d'avance
Laurent

A voir également:

Piloter word depuis excel????
Supprimer une page word - Guide
Liste déroulante excel - Guide
Word excel gratuit - Guide
Espace insécable word - Guide
Organigramme word - Guide

1 réponse

Réponse 1 / 1

baborge Messages postés 93 Date d'inscription dimanche 6 juin 2004 Statut Membre Dernière intervention 22 septembre 2012 33
16 juil. 2007 à 10:12

Bonjour,

Pour info la reponse obtenu sur les forums Microsoft:
--------------------------------------------------------------------------------------------------------------------
Bonsoir,

Dans ton fichier Excel il faut ajouter la référence à Microsoft Visual Basic
for Application x.y via le menu Outils>Références.

Dans Word il faut cocher l'option "Faire confiance au projet Visual Basic"
dans Outils>Macros>Sécurité>Editeurs approuvés.

Ensuite adapte les noms des fichiers et des répertoires.

Sub ImporterModuleFormulaire()

Dim NomModule As String, NomFormulaire As String, Chemin As String
Dim WdApp As Object, WdDoc As Object, VbComp As VBComponent

NomModule = "MonModule"
NomFormulaire = "MonFormulaire"
Chemin = "C:\..............\"

Set WdApp = CreateObject("Word.application")
WdApp.Visible = True
Set WdDoc = WdApp.Documents.Open(Filename:="C:\..........\MonDocument.doc")

On Error Resume Next
With WdDoc.VBProject
    Set VbComp = .VBComponents("MonModule")
    If VbComp Is Nothing Then
        .VBComponents.Import Chemin & NomModule & ".bas"
    Else
        MsgBox "Module présent dans le fichier."
    End If
    Set VbComp = .VBComponents("MonFormulaire")
    Set VbComp = Nothing
    If VbComp Is Nothing Then
        .VBComponents.Import Chemin & NomFormulaire & ".frm"
    Else
        MsgBox "Formulaire présent dans le fichier."
    End If
End With
End Sub

Je te renvoie à cette discussion si le fonctionnement du formulaire pose
probleme.

https://groups.google.com/forum/?hl=fr#!topic/microsoft.public.fr.excel/E3bU8n-aX6U#f0f686831d001716

Cordialement,

Manu
-----------------------------------------------------------------------------------------------------------------------

Newsletters