VBA中ADO连接mysql数据库报错：no database selected 解决方案

几天翻到一个以前连接mysql数据库的Excel vba文件,试了一下,居然链接成功,但是执行sql的时候一直报错说什么no database selected 百度谷歌了老半天,终于找到了解决方案,其实很简单,只要在连接上数据库后 加一句
Con.Execute ("USE 数据库名称")
con是ado Connection对象,里面的数据库名称 换成你自己的
后续执行就没问题啦!!