La palabra clave correcta para establecer el nombre de la aplicación en una cadena de conexión ADODB en VBA es APP , no Application Name .
Cadena de conexión de ejemplo, copiada de una aplicación de MS Access en la que estoy trabajando:
DRIVER={SQL Server};SERVER=xxxx;DATABASE=xxxx;Trusted_Connection=Yes;APP=xxxx
