id=cn.Execute (("SELECT @@Identity").Collect(0))



Cette ligne ne fonctionne pas et elle est interprété comme une erreur dans mon VBA... Bizarre non ?