Olá, Como faço para editar (inserir dados em uma planilha Excel) pelo Access, estando com o Excel fechado?
Última edição por joaomarcos84712722 em 10/10/2017, 00:07, editado 1 vez(es)
Dim VarArquivo As String
Dim rpt As Report
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xls As Excel.Worksheet
VarArquivo = "C:\Users\joaom\Desktop\Teste.xls"
Set xlsBook = Workbooks.Open(VarArquivo, , , , , , , , , True)
Set xlsApp = xlsBook.Parent
Set xls = xlsApp.Sheets("Plan1")
xlsApp.Visible = False
xlsBook.Application.Cells(2, 3).Value = "Aqui"