1/ устанавливаем http://dev.mysql.com/downloads/connector/odbc/3.51.html

2. смотрим доку http://dev.mysql.com/doc/refman/5.1/en/connector-odbc-examples-walkthrough.html

там надо дать гранты GRANT ALL ON test.* to 'myuser'@'BETA' IDENTIFIED BY 'mypassword';

3. юзаемс

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim fld As ADODB.Field
Dim sql As String

'connect to MySQL server using MySQL ODBC 3.51 Driver
Set conn = New ADODB.Connection
conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=88.198.xxx.xxx;DATABASE=xxxxx;UID=xxxxx;PWD=123456;"

conn.Open


'direct insert
conn.Execute "INSERT INTO my_ado(id,name,txt) values(1,100,'venu')"