Tutorial vba sql

Structured Query Language (SQL) é a linguagem de computador usado para gerenciar bancos de dados relacionais. Visual Basic for Applications (VBA) é a linguagem de programação desenvolvida pela Microsoft para uso com os aplicativos do Microsoft Office para criar conteúdo dinâmico. Microsoft Access é o programa de banco de dados dentro da suíte Microsoft Office que usa tanto SQL e VBA para gerenciar dados e fornecer automação para funções de banco de dados sistemáticos. Usando o shell de programação por trás Microsoft Access, você pode se conectar ao banco de dados principal, procurar dados, adicionar novos dados e excluir dados através da combinação de SQL e código de programação VBA.

Abra o banco de dados que você quer trabalhar com no Microsoft Access. Abra o Editor do Visual Basic, clicando no "Ferramentas de banco de dados" separador e, em seguida "Visual básico."

Clique em "Inserir" e depois "Módulo" no Editor do Visual Basic.

Digite o código para se conectar ao banco de dados. Você terá que estabelecer uma conexão para usar instruções SQL para o banco de dados. Sub SQLTutorial () `Configure suas variáveis ​​para armazenar as informações Dim Conn como ADODB.Connection` Esta é a conexão real Dim rsSelect como ADODB.Recordset `Isto é onde você vai guardar os dados Dim rsDelete como ADODB.Recordset Dim rsInsert como ADODB .Recordset Dim rsUpdate como ADODB.Recordset Dim strSelectQuery como string `Este é o real SQL SELECT comando Dim strDeleteQuery como string` Isto irá manter o SQL DELETE Dim strInsertQuery como string `Esta é a instrução SQL INSERT Dim strUpdateQuery como string` Esta vontade segure a instrução UPDATE `Digite os detalhes para se conectar ao banco de dados que você quer Set Conn = New ADODB.Connection com Conn .ConnectionString ="Provider = Microsoft.Jet.OLEDB.4.0-" &_ "Data Source = C: Documents SampleDatabase.mdb" .Open End With Agora a conexão com o banco de dados foi feita. Em seguida, você irá atribuir instruções SQL para as variáveis ​​que você já declaradas acima.

Digite um "SELECIONAR" instrução SQL para selecionar dados do banco de dados. A consulta SELECT é geralmente composta da seguinte forma: "colunas SELECT da tabela". Você pode adicionar critérios para a instrução SELECT, adicionando no "ONDE" cláusula. Por exemplo, você tem uma tabela chamada "clientes" que pretende procurar todos os clientes com o sobrenome "Smith." O código VBA e SQL será parecido com este: strSelectQuery = "* SELECT FROM tblCustomers ONDE LastName = `Smith` O asterisco (*) é um curinga, o que significa que você quer puxar toda a informação, ou colunas, por qualquer pessoa com o sobrenome "Smith." Para selecionar determinadas colunas, você usaria: strSelectQuery = "SELECIONE nome, sobrenome DE tblCustomers ONDE LastName = `Smith`"

Digite o "EXCLUIR" declaração se você deseja excluir linhas de dados de uma tabela. O código para isso é: strDeleteQuery = "DELETE FROM tblCustomers ONDE LastName = `Smith`" Esta declaração vai excluir todas as linhas onde o cliente tem um sobrenome "ferreiro" a partir de "clientes" mesa. A sintaxe básica para uma instrução DELETE é "DELETE FROM tabela WHERE coluna = `valor`."

Digitar a sintaxe para inserir uma nova linha em uma tabela. Use o "INSERIR" declaração. strInsertQuery = "VALORES INSERT INTO tblCustomers (John, Smith, 123 Main Street, Cleveland, Ohio)" Se você tivesse uma tabela clientes que tem nome, sobrenome, endereço, cidade e colunas de Estado, esta declaração irá inserir nos dados na coluna da direita. A vírgula indica o código para pular para a próxima coluna antes de entrar nos valores. Tenha certeza que você está digitando os valores na ordem correta das colunas na tabela de modo a que os seus dados são consistentes.

Digite a instrução SQL para alterar uma linha de dados. Isto é o "ATUALIZAR" declaração. strUpdateQuery = "ACTUALIZAÇÃO tblCustomers SET sobrenome = `Jones`, Nome ="Jim" ONDE LastName = `Smith`" Este alterações de instrução todos que tem um sobrenome "ferreiro" para "Jones" e seus primeiros nomes para "Jim." Você pode alterar várias colunas de dados de uma vez em uma instrução UPDATE, separando as colunas com vírgulas. A sintaxe básica para uma atualização é "Atualizar a tabela SET column1 = value1, column2 = value2, column3 = value3, ... WHERE coluna = valor."

Digite o código VBA que irá executar a consulta e salvar os resultados em conjuntos de registros. Feche o código VBA. Definir rsSelect = New ADODB.Recordset Com rsSelect Set .ActiveConnection = Conn .CursorType = adOpenStatic .Source = strSelectQuery .Open End With Set rsDelete = New ADODB.Recordset Com rsDelete Set .ActiveConnection = Conn .CursorType = adOpenStatic .Source = strDeleteQuery .Open End With Set rsInsert = New ADODB.Recordset Com rsInsert Set .ActiveConnection = Conn .CursorType = adOpenStatic .Source = strInsertQuery .Open End With Set rsUpdate = New ADODB.Recordset Com rsDelect Set .ActiveConnection = Conn .CursorType = adOpenStatic .Source = strUpdateQuery .Open End With `Digite o código VBA para fazer o trabalho com os dados que reunimos através das instruções SQL. `Você pode usar os dados para postar em formas, em outras tabelas ou em relatórios. `Feche os registros e conexão com você é feito rsSelect.Close rsDelete.Close rsInsert.Close rsUpdate.Close End Sub

Referências

• ligação W3 Escolas: instrução SQL DELETE
• ligação W3 Escolas: SQL INSERT INTO
• ligação W3 Escolas: Declaração SQL Atualização
• ligação W3 Escolas: SQL instrução SELECT
• ligação Dicas de acesso: Acesso e SQL

Sobre o autor

Tiesha Whatley tem sido escrito há mais de 10 anos. Ela foi publicada em "Maria Clara," "Ébano" e "Modern Bride" revistas. Ela é bacharel em Ciência em Inglês da Universidade de Alabama em Birmingham e tem vindo a trabalhar na indústria de planejamento do casamento para mais de 13 anos.