Date VBA-E en format yyyymmdd

bonjour je viens sollicité votre aide car j'aurai besoin d'aide sur du VBA,

dFirst = CDate("1/" & Format(DateAdd("m", 1, Date), "mm/yyyy"))
  dLast = CDate("25/" & Format(DateAdd("m", 1, Date), "mm/yyyy"))
  MsgBox "Premier jour: " & dFirst & vbCrLf & "Dernier jour: " & dLast

voilà pour le moment mon code ressemble très simplement a cela sauf que j'aimerai avoir la date sous un format spécifique ( yyyymmdd).
est t'il possible de le faire ? si oui comment? et de plus j'aimerai si possible que la variable dLast reprenne la variable dFirst et lui ajouté 30 jours.

Merci d'avance pour votre aide.