איך אני מוסיף למשתנה מסוג תאריך של

ככה
theDate = DateAdd("d",13,theDate)

פשוט
d = סוג הערך שמוסיפים/מורידים לתאריך. d = יום.
theDate = המשתנה שמכיל את התאריך שלך.

הערכים הקיימים בפונקציה:
YYYY – שנה
Q – רבעון
M – חודש
W – יום שבוע
WW – שבוע בשנה
Y – יום בשנה
D – יום
H – שעות
N – דקות
S – שניות

ככה
theDate = DateAdd("d",13,Now())