Mysql
 sql >> база данни >  >> RDS >> Mysql

Изпълнете SQL, написан в текстово поле с VBA

Thisworkbook.Sheet1 не е валиден път на обект, опитайте вместо това:

SqlString = ThisWorkbook.Sheets("Sheet1").Shapes("SqlQuery1").OLEFormat.Object.Text

Или просто

SqlString = Sheet1.Shapes("SqlQuery1").OLEFormat.Object.Text

И се уверете, че листът определено е наречен "Sheet1"

Освен това трябва да промените

rs.Open strSQL, conn, adOpenStatic

към това:

rs.Open SqlString, conn, adOpenStatic

И вероятно трябва да използвате

Dim SqlString as String

в началото на рутината



  1. Database
  2.   
  3. Mysql
  4.   
  5. Oracle
  6.   
  7. Sqlserver
  8.   
  9. PostgreSQL
  10.   
  11. Access
  12.   
  13. SQLite
  14.   
  15. MariaDB
  1. Как да разпределя IP адрес във VPC към RDS инстанция?

  2. Mysql - 1045 - Достъпът е отказан за потребител 'user'@'localhost' (с помощта на парола:Да)

  3. Автоматично довършване в MySQL под Windows

  4. Транзакционен DDL работен поток за MySQL

  5. MySQL:актуализиране без промяна на данните, възможно ли е?