Saber como abrir uma planilha do Microsoft Excel a partir do Microsoft Access e inserir uma nova coluna na planilha usando o Visual Basic for Applications (VBA) pode fazer o seu pedido de acesso mais dinâmico. Access é um sistema de gerenciamento de banco de dados relacional comumente usado para bancos de dados menores . Excel é um aplicativo de planilha eletrônica que oferece ferramentas poderosas para analisar os dados . VBA é uma linguagem de programação de computador popular usado para automatizar tarefas de outra forma feitas manualmente . Em poucos passos você pode escrever código VBA no Access para abrir um livro do Excel e inserir uma nova coluna para Sheet1. Instruções
1
Inicie o Microsoft Office Access 2007 e selecione " Banco de Dados em Branco " , em seguida, clique em "Criar ". Clique em " Ferramentas de banco de dados " e selecione " Visual Basic ". Clique no botão " Insert" campo e selecione " Module ".
2
Copie e cole o seguinte código em seu módulo. Este código vai abrir uma planilha, inserir uma nova coluna à direita da "Coluna C " e inserir " Esta coluna foi inserido a partir do Access . "
Private Sub addExcelColumn ()
Dim xlApp as Excel.Application
Dim xlBook Como Excel.Workbook
Dim xlSheet Como Excel.Worksheet
Set xlBook = Workbooks.Add (modelo : = " C: \\ Book1.xls " )
Set xlApp = XLBook.Parent
Definir xlSheet = XLBook.Worksheets ( " Sheet1 " )
XLBook.Windows (1). Visible = True
.
xlApp.Visible = True
Com xlSheet
Colunas. ("C: C " ) Selecione
Selection.Insert Turno: = xlToRight
. Range (" C1" ) . Selecione
Selection.Value = " Esta coluna foi inserido a partir do Access "
. Range (" D3 " ) . Selecione
End With
Sub End
3
Edite a seguinte linha de código e digite o caminho para sua planilha :
Set xlBook = Workbooks.Add ( Template : = " C: \\ Book1.xls " . " F5" )
Execute sua rotina pressionando