Wie kann ich ein Datum abhängig von einem anderen Datum machen [Word]

[mika47]

Hallo zusammen,

da ich hier im Forum leider nicht fündig geworden bin, hier meine Frage:

Ich möchte in Word ein Datumsfeld "DatumZukunft" erzeugen, welches sich auf ein anderes Datumsfeld "DatumJetzt" bezieht und dem 4 Wochen (28 Tage) hinzu addiert.

Dazu habe ich 2 Datumssteuerelemente erschaffen.
Ich weiß leider nicht wie ich ein Makro so schreibe, dass es sich das Datum aus Feld "Datum" holt und es dann plus 28 Tage in "DatumZukunft" schreibt.

Ich hoffe das ist soweit verständlich und jemand kann mir weiterhelfen.

Liebe Grüße
Mika

[mika47]

[Edit:] Das ist das Makro welches ich dafür benutzen wollte:

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean) Dim oCC As ContentControl Select Case ContentControl.Title Case "Date" ContentControl.DateDisplayFormat = "MMM/dd/yyyy" Set oCC = ActiveDocument.SelectContentControlsByTitle("Date Advanced").Item(1) With oCC .LockContents = False If IsDate(ContentControl.Range.Text) Then .Range.Text = DateAdd("d", 3, CDate(ContentControl.Range.Text)) Else .Range.Text = vbNullString End If .LockContents = True End With ContentControl.DateDisplayFormat = "dddd, MMM dd, yyyy" End Select End Sub

[Christian Marquardt]

http://web.archive.org/web/200710170...FAQ/DatBer.htm