[Resolvido]Importação arquivo CSV

Boa tarde Galera, tudo bem?

É possível importar para o access uma tabela com as informações abaixo, de um arquivo em formato CSV?:

Código:

"Index","Data","Tipo de Cliente","CNPJ","Nome fantasia","E-mail do Cliente","Telefone do Cliente","[Produtos] Product Name","[Produtos] Options","[Produtos] Unit Price","[Produtos] Unit","[Produtos] Amount","[Produtos] Total Price","[Produtos] Grand Total","[Produtos] Currency","Condição de Pagamento","Tipo de Frete","Observações","Assinatura do Cliente","Submitter","Submission Date","Submission ID"
1,"11/10/2021","Cliente","XXXXXXXXXXXXXX",,,,"A- Produto A|B - Produto B|C - Produto C|D - Produto D|E -  Produto E|F - Produto F","|||||","0|0|0|0|0|0","pct|pct|pct|pct|pct|pct","1|1|1|1|1|1","0|0|0|0|0|0","0","BRL","A Vista","CIF","",,,"11/10/2021, 3:48:49 PM","5305f058"

Porém, gostaria que aparecesse assim na tabela do Access:

Na mensagem 2 deste tópico aqui tem um exemplo. Veja se consegue adaptar para o seu caso.

https://www.maximoaccess.com/t35425-importando-csv

thiagomcosta, obrigado pelo retorno.

O básico dá pra fazer, mas não sei se vc viu que existe dentro do meu CSV uma linha cujos registros são separados por "|" e esses registros devem ir pra uma tabela mas na forma de registro e não em uma única linha.. eis a complicação.


Abs irmão

Entendi, então você tem mais de um registro em uma mesma linha.

Neste caso vai ter que ler a linha normalmente, estou considerando que até você saiba fazer, e então nestes campos usar a função Split. Só depois disso vai conseguir trabalhar com as informações.

Exemplo:

Código:


Dim Produtos
Dim ArrayDeProdutos()

'Vai ler a linha do CSV, etc. etc. etc.

Produtos = "A- Produto A|B - Produto B|C - Produto C|D - Produto D|E -  Produto E|F - Produto F"
ArrayDeProdutos = Split(Produtos, "|")


Neste caso você terá:
ArrayDeProdutos(0) = "A- Produto A"
ArrayDeProdutos(1) = "B- Produto B"
ArrayDeProdutos(2) = "B- Produto C"
...
E assim por diante

Lógico que terá que trabalhar com as informações depois e criar os registros com um looping.

Obrigado a todos pelo apoio,

Estou encerrando esse tópico, pois mudei a forma de execução.

Abs