Microsoft Access usa SQL com VBA para criar soluções de banco de dados avançados.
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.”
Video: Integrating Excel VBA with SQL Server: Lesson 1
Clique em “Inserir” e depois “Módulo” no Editor do Visual Basic.
Video: How to Create an SQL Database with Excel with VBA
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.
Video: Excel 2010 VBA Tutorial 72 – ADODB – Recordsets and SQL
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.
Video: Programming in Microsoft Access 2013 and VBA
