Freigeben über


MailMerge.OpenDataSource-Methode (Publisher)

Eine Datenquelle wird mit der angegebenen Publikation verknüpft, die eine Hauptpublikation wird, wenn sie es nicht schon ist.

Syntax

Ausdruck. OpenDataSource (bstrDataSource, bstrConnect, bstrTable, fOpenExclusive, fNeverPrompt)

Ausdruck Eine Variable, die ein MailMerge-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
bstrDataSource Optional String Der Pfad- und Dateiname der Datenquelle. Sie können eine Microsoft Query-Datei (QRY) angeben, anstatt eine Datenquelle, eine Verbindungszeichenfolge und eine Tabellennamenzeichenfolge anzugeben. Werte in einer Microsoft Query-Datei überschreiben Werte für bstrConnect und bstrTable.
bstrConnect Optional String Eine Verbindungszeichenfolge.
bstrTable Optional String Der Name der Tabelle in der Datenquelle.
fOpenExclusive Optional Long True, wenn andere Benutzer Zugriff auf die Datenbank zu verweigern. False ermöglicht anderen Personen Lese-/Schreibberechtigung auf die Datenbank. Der Standardwert ist False.
fNeverPrompt Optional Long True fragt nie beim Öffnen der Datenquelle. False zeigt das Dialogfeld Datenlinkeigenschaften an. Der Standardwert ist False.

HinwBemerkungeneise

[!HINWEIS] Wenn Sie eine Datenquelle für Seriendruck verwenden, müssen Sie vor dem Anfügen an die Datenquelle einen Datensatzkatalogbereich auf der Seite hinzufügen.

Beispiel

In diesem Beispiel wird eine Tabelle aus einer Datenbank verknüpft, und allen anderen Personen der Schreibzugriff auf die Datenbank, während sie geöffnet ist, verweigert.

Damit dieses Beispiel ordnungsgemäß ausgeführt werden kann, müssen Sie durch einen gültigen Dateipfad und TableName durch einen gültigen Namen der Datenquellentabelle ersetzenPathToFile.

Sub AttachDataSource() 
 
    ActiveDocument.MailMerge.OpenDataSource _ 
        bstrDataSource:="PathToFile", _ 
        bstrTable:="TableName", _ 
        fNeverPrompt:=True, fOpenExclusive:=True 
 
End Sub

Hinweis

Wenn TableNameein Excel-Arbeitsblatt geöffnet wird, TableName muss auf $folgen. Das heißt, bstrTable:="Sheet1" wird nicht funktionieren; bstrTable:="Sheet1$" wird funktionieren. Es folgt ein Beispiel, das dies weiter verdeutlicht.

In diesem Beispiel werden die Daten in MySpreadSheet.xlsx, Sheet1, im selben Verzeichnis wie die Verlegerdatei gespeichert.

Dim strDataFile as String
strDataFile = Application.ActiveDocument.Path & "MySpreadSheet.xlsx"

ActiveDocument.MailMerge.OpenDataSource _ 
    bstrDataSource:=strDataFile, _ 
    bstrTable:="Sheet1$", _ 
    fNeverPrompt:=True, fOpenExclusive:=True 

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.