Microsoft
Software
Hardware
Network
Cuestión : error required del objeto
Estoy intentando escribir una escritura de VB adentro sobresalgo que pregunte algunas tablas y vuelva los resultados en una hoja de balance. Antes de que haya utilizado una pregunta del acceso e importado le en sobresale como pregunta de la base de datos. Ahora, estoy utilizando a encargado de la empresa del SQL y no lo sé de una manera de importar una pregunta del analizador de pregunta, así que escribí esta escritura de VB que intentaba conectar con mis tablas e importar los datos que manera. Estoy consiguiendo un error que diga el objeto requerido. Aquí está mi escritura: el
' del
Sub CompareQry () declara el object
Dim cuarto de galón como QueryTable
' declara el varaiables
Dim SQLDB de la base de datos como String
Dim SQLServer como String
Dim SQLDbase como String
Dim SQLUser como String
Dim SQLPword como String
Open App.Path y “\ SQLConnect.txt” para la entrada como #1
Input #1, SQLServer, SQLDbase, SQLUser de QueryTable, SQLPword
Close #1
' fijó el SQL Statement
sqlstring = “a.item SELECTO, a.qty, a.strnum, b.it
em como itemb, b.qty como qtyb, b.strnum” _
& “del firsttbl” un _
& “interno ensamblan [server1] .STORE.dbo.tablen
ame b” _
& “en a.strNum = b.strnum y ” _
& “a.Item = b.Item” _
& “y orden “09” del <> b.qty de a.qty” _
& “donde a.strNum = por a.item "
' fijó el string
connstring = “Provider=sqloledb; Server=
” y SQLServer y”; Identificación del usuario = " y SQLUser y “; Pwd=” y SQLPword y”; Database= " y el instrumento de SQLDbase
' la conexión, funcionan la pregunta, y el add
' los resultados a la hoja de balance que comienza en la fila A1
With ActiveSheet.qt.Add (Connect
ion: =conns
tring, destinación: =Range (“A1”), Sql: )
. ¡Extremo With
End Sub
Thanks del
de Refresh
para toda su ayuda!
KT
class= del
Respuesta : error required del objeto
Su error es más probable aquí
ActiveSheet.qt.Add
Porque ActiveSheet no tiene algo cuarto de galón llamado
Usted puede querer
Fijar cuarto de galón = ActiveSheet.QueryTables.Add
(….
Otras soluciones
Cómo fijar un número de líneas en un informe
Cómo fijar extremo del aeropuerto como servidor del DHCP en el LAN con SonicWall
Ediciones del enlace hipertexto
Agregar la fecha a MySQL
Pares de las preguntas de Apple
El DNS reverso no empareja la bandera del smtp
¿Cómo puedo funcionar conmigo PC en modo seguro?
HISTOGRAMA CON EL CP Y EL ANÁLISIS DE CPK
reglas no corrientes de la perspectiva
volver un valor