Pessoal, estou efetuando a importação de uma planilha Excel utilizando um range de "A1:H500" para o Access via VBA.
A importação esta ocorrendo corretamente, porém necessito incluir no Access, na próxima coluna(9) um informação fixa, exemplo "DQ_052017".
Tenho cerca de 5 planilha sendo incluídas e preciso informar a origem de cada uma delas. Pensei que era só incluir um "&" após o "!A1:H500" do código abaixo, porém não é assim...
Abaixo funcionando corretamente:
With aaa
For Each bbb In .Worksheets
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, strTabela, pathplandados, True, bbb.Name & "!A1:H500"
Next
End With
muito obrigado,
Alex
A importação esta ocorrendo corretamente, porém necessito incluir no Access, na próxima coluna(9) um informação fixa, exemplo "DQ_052017".
Tenho cerca de 5 planilha sendo incluídas e preciso informar a origem de cada uma delas. Pensei que era só incluir um "&" após o "!A1:H500" do código abaixo, porém não é assim...
Abaixo funcionando corretamente:
With aaa
For Each bbb In .Worksheets
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, strTabela, pathplandados, True, bbb.Name & "!A1:H500"
Next
End With
muito obrigado,
Alex