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. |
Hinweise
[!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 TableName
eine Excel-Kalkulationstabelle 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.