Objekt připojení ADO má kolekci Errors, kterou můžete zkontrolovat po spuštění SQL:
conn.Errors.Clear
Set rs = conn.Execute(Myquery)
If conn.Errors.Count > 0 Then
For i = 0 To conn.Errors.Count
Debug.Print conn.Error(i).Number
Debug.Print conn.Error(i).Source
Debug.Print conn.Error(i).Description
next i
End If
To by vás mělo nastartovat. Možná zjistíte, že se vám zobrazuje 'chyba nula', což je ve skutečnosti stavová zpráva; pokud ano, budete muset udělat nějaké další kódování.