Thema Datum  Von Nutzer Rating
Antwort
Rot Serienbrief Empfängerliste filtern in Word 2016 mit VBA
21.03.2018 10:51:18 Dominic B.
NotSolved

Ansicht des Beitrags:
Von:
Dominic B.		 Datum:
21.03.2018 10:51:18		 Views:
1147		 Rating:
     
Antwort:
  Ja
Thema:
Serienbrief Empfängerliste filtern in Word 2016 mit VBA

Grüß euch, 

ich habe ein Excel Dokument in denen Kundendaten eingetragen sind. Unter anderem gibt es dort ein Feld namens "Fällig am", in welchem das genau Datum (tt.mm.jjj) einer fälligen Zahlung eingetragen ist. Nun will ich in Word aber jene Adressen im Serienbrief haben, bei denen im gewünschten Jahr (z.B 2018) eine Zahlung fällig ist, also alle Adressen die 2018 eine Zahlung leisten müssen. Da ich dass nicht über die Filterfunktion in Word machen will, soll beim Start der Wordvorlage ein Feld erscheinen, indem man das zu filternde Jahr eingeben soll.

Ich habe einen ähnlichen Code gefunden mit den man den Namen filtern kann und ihn bearbeitet, aber ich denke ich habe mit "findrecord" den falschen Befehl. Kann mir jemand weiterhelfen? 

Sub document_new()
Dim adressat As String

adressat = InputBox("Bitte zu filterndes Jahr angeben")

    With ActiveDocument.MailMerge.DataSource
        .ActiveRecord = wdFirstRecord
            If .FindRecord(findtext:=adressat, Field:="Fällig_am") = False Then
               MsgBox "In diesem Jahr sind keine Zahlungen fällig"
            End If
    End With
End Sub

 

Vielen Dank schonmal und liebe Grüße,

Dominic

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Serienbrief Empfängerliste filtern in Word 2016 mit VBA
21.03.2018 10:51:18 Dominic B.
NotSolved