Ma sei un disastro, ci sono più errori in questo esempio banale che in un progetto enorme...!
Su Evento Click del pulsante [cmdCostanti]... hai una chiamata ad una funzione:
1) Non esistente, Costanti()...? Immagino dovesse essere cmdCostanti()...?
2) Costanti è un nome Riservato
3) cmdCostanti è una Sub con lo stesso nome del commandButton... ma ti piace dare gli stessi nomi a tutto...?????
Se poi quella Sub non la modifichi in Function non funziona.
Importato Maschera e Tabella in un nuovo File.Accdb e rinominato le cose, funziona tutto.