MailMergeDataSource.FindRecord-Methode (Word)
Durchsucht den Inhalt einer bestimmten Seriendruckdatenquelle nach Text in einem bestimmten Feld. Gibt True zurück, wenn der Suchtext gefunden wird. Boolescher Wert.
Syntax
Ausdruck. FindRecord
( _FindText_
, _Field_
)
Ausdruck: Erforderlich. Eine Variable, die ein MailMergeDataSource-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
FindText | Erforderlich | String | Der zu suchende Text. |
Field | Erforderlich | Variant | Der Name des Felds, das durchsucht werden soll. |
Rückgabewert
Boolesch
Bemerkungen
Diese Methode hat dieselbe Wirkung wie die Schaltfläche Datensatz suchen auf der Symbolleiste Seriendruck.
Mit der FindRecord-Methode wird nur vorwärts gesucht. Wenn es sich bei dem aktiven Datensatz nicht um den ersten Datensatz in der Datenquelle handelt und der gesuchte Datensatz vor dem aktiven Datensatz angeordnet ist, gibt die FindRecord-Methode keine Ergebnisse zurück. Wenn Sie sicherstellen möchten, dass die gesamte Datenquelle durchsucht wird, legen Sie die ActiveRecord-Eigenschaft auf wdFirstRecord fest.
Beispiel
In diesem Beispiel wird ein Seriendruckdokument für den ersten Datensatz angezeigt, in dem das Feld "FirstName" "Joe" enthält. Wenn der Datensatz gefunden wird, wird die Nummer des Datensatzes in der Variablen numRecord gespeichert.
Dim dsMain As MailMergeDataSource
Dim numRecord As Integer
ActiveDocument.MailMerge.ViewMailMergeFieldCodes = False
Set dsMain = ActiveDocument.MailMerge.DataSource
If dsMain.FindRecord(FindText:="Joe", _
Field:="FirstName") = True Then
numRecord = dsMain.ActiveRecord
End If
Siehe auch
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für