Immagino che nel tuo database esista una tabella che contiene un campo che identifica il dipendente e uno con la data della trasferta. Chiamo questa tabelkla Trasferte. Puoi evitare il ricorso a VB creando una query parametrica che prende i criteri dalla maschera calendario, vale a dire:
crea una query che prende i dati dalla tabella Trasferte. Nella riga criteri nel campo DataTrasferta immetti un espressione che calcola la data sulla base dei dati della maschera. Per dirti che espressione digitare, però, dovrei sapere qualcosa di più sui dati contenuti nei campi maschera. Se c'è un campo Data che contiene la dat in formato data, ad esempio, digita Forms!Calendario!Data. Se invece hai il giorno, il mese e l'anno in campi distinti puoi usare la funzione DateAdd, ma attendo ulteriori imformazioni sulla tua maschera calendario.
A questo punto per eseguire la query tutto il codice che ti serve è DoCmd.OpenQuery "NomeQuery"
In alternativa puoi evitare di creare la query e farla eseguire con il codice ogni volta con il metodo RunSQL in questoi modo:
Dim stSQL as String
stSQL="SELECT Trasferte.Dipendente FROM Trasferte WHERE (((Trasferte.Data)=" & Me!Data & "));"
DoCmd.RunSQL stSQL
Anche in questo secondo caso ho immaginato che esista sulla tua maschera un campo Data con la data completa.
Fammi sapere come effettivamente è immagazinata la data nell'origine dati della tua maschera Calendario che vediamo di definire meglio il codice.
Ciao
Davide