Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres Publisher : macro pour choisir base de donnée au lancement

Jopahley

XLDnaute Nouveau
Bonjour,
Je crée ce sujet car je vois très très peu de solutions pour les macros de Publisher
Mon objectif est de permettre à l'utilisateur de choisir quelle base de donnée (pour publipostage) il va charger au lancement
Avec une fenêtre d'explorateur de dossier en gros
J'ai cherché beaucoup de tutos mais c'est toujours des formules pour charger la base de données à une adresse et un fichier précis
Je veux que le macro laisse le choix à un utilisateur pas très expérimenté

J'ai bien sûr tenté d'enregistrer le macro manuellement sur Word pour m'inspirer (puisqu'il n'y a pas cette fonction sur Publisher)
Mais ça ne fait absolument rien sur Publisher

VB:
Sub Macro3()

    ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
    ActiveDocument.MailMerge.OpenDataSource Name:= _
        "C:\Users\rdp5\Documents\Mes sources de données\Classeur3.xlsx", _
        ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=True, _
        AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:="", _
        WritePasswordDocument:="", WritePasswordTemplate:="", Revert:=False, _
        Format:=wdOpenFormatAuto, Connection:= _
        "Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=C:\Users\rdp5\Documents\Mes sources de données\Classeur3.xlsx;Mode=Read;Extended Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Engine Type=37;Jet " _
        , SQLStatement:="SELECT * FROM `Variables$`", SQLStatement1:="", SubType _
        :=wdMergeSubTypeAccess
        
End Sub

Je pense que la commande doit pas être bien compliquée mais je ne connais juste pas assez bien les synthaxes propres à Publisher et pour l'ouverture de fichier à importer

Merci si quelqu'un peut m'éclairer
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…