Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Macro criar novo arquivo em CSV separado por ponto e vírgula
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
Opa Magina,
Cria um Novo Modulo, cola la a programação lá dentro
e manda rodar a macro dentro dessa planilha que contem os dados ela vai salvar um novo arquivo em .CSV separado por ";".
Tente fazer isso e avise amigo se o arquivo ficou como você solicitou.
Cria um Novo Modulo, cola la a programação lá dentro
e manda rodar a macro dentro dessa planilha que contem os dados ela vai salvar um novo arquivo em .CSV separado por ";".
Tente fazer isso e avise amigo se o arquivo ficou como você solicitou.
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
olá,
estou a fazer alguma coisa de errado,
estou a colar a programação num novo modulo dentro do ficheiro original
não faz nada ao ficheiro novo que cria...
um aparte, que não sei se disse.
o nome do ficheiro csv tem de ser o nome criado origininalmente, xxxxx0001, xxxxx0002, xxxxxx0003 e por ai fora...
estou a fazer alguma coisa de errado,
estou a colar a programação num novo modulo dentro do ficheiro original
não faz nada ao ficheiro novo que cria...
um aparte, que não sei se disse.
o nome do ficheiro csv tem de ser o nome criado origininalmente, xxxxx0001, xxxxx0002, xxxxxx0003 e por ai fora...
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
Olá amigo,
Então, postei a programação como teste, mas precisas mudar ao seu favor, como não sei bem como é seu projeto deixei para você moldar como queiras, porque não sei se você importa ou exporta de uma outra planilha ou como você controla entende?
Tipo mude o caminho deste :
sFname = sFname = "C:\Users\User\Desktop\ra.csv"
Para qualquer outro ou até mesmo puxar de uma célula
Segue método para puxar da Célula
sFname = Range("A1")
Ai você consegue colocar o caminho e por sequencial o nome do arquivo padrão também usando um concatenar ou se vai querer integrar isso dentro do que já tais utilizando.
A programação Criada foi para poder converter somente, para ver se atende o que você precisa e fazer um teste.
tudo vai depender se você vai fazer todas as conversões pelo um único projeto ou vai entrar em planilha e converter, planilha e converter e assim por diante? Ou vai importar os dados e gerar um novo ou substituir e assim por diante também..
Complexo mas tranquilo uahauhauahuaha
Então, postei a programação como teste, mas precisas mudar ao seu favor, como não sei bem como é seu projeto deixei para você moldar como queiras, porque não sei se você importa ou exporta de uma outra planilha ou como você controla entende?
Tipo mude o caminho deste :
sFname = sFname = "C:\Users\User\Desktop\ra.csv"
Para qualquer outro ou até mesmo puxar de uma célula
Segue método para puxar da Célula
sFname = Range("A1")
Ai você consegue colocar o caminho e por sequencial o nome do arquivo padrão também usando um concatenar ou se vai querer integrar isso dentro do que já tais utilizando.
A programação Criada foi para poder converter somente, para ver se atende o que você precisa e fazer um teste.
tudo vai depender se você vai fazer todas as conversões pelo um único projeto ou vai entrar em planilha e converter, planilha e converter e assim por diante? Ou vai importar os dados e gerar um novo ou substituir e assim por diante também..
Complexo mas tranquilo uahauhauahuaha
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
Olá,
tive a testar e não funcionou.
não sei se estou a fazer direito...
o que aconteceu foi que copiou tudo o que estava na folha ativa, e colou no ficheiro csv destino...
não substituiu... a "," por ";"
pode ajudar?
tive a testar e não funcionou.
não sei se estou a fazer direito...
o que aconteceu foi que copiou tudo o que estava na folha ativa, e colou no ficheiro csv destino...
não substituiu... a "," por ";"
pode ajudar?
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
Estranho para mim ficou certinho, se eu abrir o arquivo exportado pelo bloco de notas ele está separado por ";"...............
Certo deixa eu te pergunta uma coisa para entender
Dentro do seu arquivo CSV ele tem que ficar assim ?
julio;104020;mangilli;104021 "Ele teria que ficar assim dentro de uma unica célula"? Isso resolveria?
Estou com duvida porque você demonstrou um arquivo txt e um CSV e meu arquivo ficou igual o seu, porem podes me passar o arquivo que você utiliza para exportação? de como deveria ficar?
Preciso de um modelo real do que você precisa amigo, adiciona uma modelo básico do que você faz...
Certo deixa eu te pergunta uma coisa para entender
Dentro do seu arquivo CSV ele tem que ficar assim ?
julio;104020;mangilli;104021 "Ele teria que ficar assim dentro de uma unica célula"? Isso resolveria?
Estou com duvida porque você demonstrou um arquivo txt e um CSV e meu arquivo ficou igual o seu, porem podes me passar o arquivo que você utiliza para exportação? de como deveria ficar?
Preciso de um modelo real do que você precisa amigo, adiciona uma modelo básico do que você faz...
Re: Macro criar novo arquivo em CSV separado por ponto e vírgula
olá
fiz um teste que achei que já tinha feito
alterei para de true para false no final da conversão.
ActiveWorkbook.Close False
funcionou...
obrigado Julio pelo esforço.
fiz um teste que achei que já tinha feito
alterei para de true para false no final da conversão.
ActiveWorkbook.Close False
funcionou...
obrigado Julio pelo esforço.
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm