Visual Basic - fecha de inicio de semana

Hola

Deseo obtener las ventas realizadas ya sea por dia,
semana o mes, pero como puedo saber en que fecha inicio
la semana actual o la semana anterior anterior.

De antemano muchas gracias.

Atte. Fdo. Fdez.

Esta linea la puedes poner en una función,

var = DateAdd("d", (Weekday(Now, vbMonday) - 1) * -1, Now)

En formato Americano el día domingo es el primer día de la semana, por eso se pone vbMonday como primer día de la semana.