Al final mirando mucho en la ayuda de Access un compañero mio encontró la solución (como la ayuda viene en ingles se tardo bastante), estos de los idiomas
If Weekday(Date, vbSunday) - 1 = 0 Then
MsgBox WeekdayName(7) ' es domingo
'si es domingo, para que se lance el lunes entonces
'se actualiza el campo de la tabla, incrementando la fecha
'en 1 dia.
db.Execute ("update nombre_tabla set fecha_lanzamiento=fecha_lanzamiento+1 where fecha_lanzamiento=date")
Else
If Weekday(Date, vbSaturday) - 1 = 0 Then
MsgBox WeekdayName(6) 'sabado
'lo mismo pero para que se lance dos dias mas tarde y caiga
'en lunes
db.Execute ("update nombre_tabla set fecha_lanzamiento=fecha_lanzamiento+2 where fecha_lanzamiento=date")
Else
MsgBox WeekdayName(Weekday(Date, vbSunday) - 1)
End If
End If