Filtro maschera tramite combobox

[iago]

Buongiorno, mi sono appena iscritto e avrei bisogno del vostro aiuto.
Sto costruendo un DB e ho una maschera "M1" che (grazie al seguente codice) filtra un'altra maschera "M0_vendite_tot" per il valore inserito in uno dei 5 combobox.

Private Sub CasellaCombinata1_Click()

If (Me!CasellaCombinata1.Value = " Tutti") Then
DoCmd.OpenForm "M0_vendite_tot"
Else
DoCmd.OpenForm "M0_vendite_tot", , , "AL_MASS=" & Me!CasellaCombinata1.Value
End If

End Sub


Private Sub CasellaCombinata2_Click()

If (Me!CasellaCombinata2.Value = " Tutti") Then
DoCmd.OpenForm "M0_vendite_tot"
Else
DoCmd.OpenForm "M0_vendite_tot", , , "DATE_YEAR=" & Me!CasellaCombinata2.Value
End If

End Sub

Private Sub CasellaCombinata3_Click()

If (Me!CasellaCombinata3.Value = " Tutti") Then
DoCmd.OpenForm "M0_vendite_tot"
Else
DoCmd.OpenForm "M0_vendite_tot", , , "DATE_MONTH=" & Me!CasellaCombinata3.Value
End If

End Sub

Private Sub CasellaCombinata4_Click()

If (Me!CasellaCombinata4.Value = " Tutti") Then
DoCmd.OpenForm "M0_vendite_tot"
Else
DoCmd.OpenForm "M0_vendite_tot", , , "AM_NAME=" & Me!CasellaCombinata4.Value
End If

End Sub
Private Sub CasellaCombinata5_Click()

If (Me!CasellaCombinata5.Value = " Tutti") Then
DoCmd.OpenForm "M0_vendite_tot"
Else
DoCmd.OpenForm "M0_vendite_tot", , , "TERR_NAME=" & Me!CasellaCombinata5.Value
End If

End Sub

adesso vorrei invece che la maschera venisse filtrata per i valori inseriti contemporaneamente nei vari combobox, non più per uno solo alla volta! cioè prima vorrei inserire tutti i valori nei combobox e poi me li dovrebbe filtrare tutti insieme.
mi potreste aiutare?

Grazie!!