Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Converter todas as ...
 
Notifications
Clear all

Converter todas as planilhas do Excel para CSV Com Macro

 
2024 - VBA & Macros
Post Recente por ghuto_lima 10 anos atrás
7 Posts
2 Usuários
0 Reactions
1,782 Visualizações
RSS
 ghuto_lima
(@ghuto_lima)
Posts: 70
Estimable Member
Topic starter
 

Ola pessoal,

Tenho vários arquivos em Excel com muitas planilhas, muitas mesmo, e tenho que converter ou salvar essas planilhas em .csv.
O problema é que como são muitas estou tendo uma trabalheira em salvar uma a uma em .csv, então pesquisando na internet, descobri algumas Macros que dizem que converte toda a pasta do Excel em .csv, só que não estou conseguindo.

Abaixo o link de um esses sites.
http://pt.wingwit.com/Software/microsof ... 35812.html

Será que alguém pode me ajudar.

Obrigado.

 
Postado : 25/11/2014 9:02 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Uma forma seria

Sub AleVBA_13623()
Dim ws As Worksheet, newWb As Workbook

Application.ScreenUpdating = False
For Each ws In Sheets(Array("Plan1", "Plan2", "Plan3", "Plan4"))
   ws.Copy
   Set newWb = ActiveWorkbook
   With newWb
      .SaveAs ws.Name, xlCSV
      .Close (False)
   End With
Next ws
Application.ScreenUpdating = True

End Sub

Att

 
Postado : 25/11/2014 9:56 am
 ghuto_lima
(@ghuto_lima)
Posts: 70
Estimable Member
Topic starter
 

alexandrevba.

Valeu pela resposta, acho que até deu certo, renomeei as plan1, plan2 para as que uso e deu certo, mas onde estão salvas.....rs

Abraço

 
Postado : 25/11/2014 10:07 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Use a pesquisa do Windows NomeDoArquivo.csv
Ou.........
Veja em Documentos

Att

 
Postado : 25/11/2014 10:42 am
 ghuto_lima
(@ghuto_lima)
Posts: 70
Estimable Member
Topic starter
 

Boa tarde!!

Use a pesquisa do Windows NomeDoArquivo.csv
Ou.........
Veja em Documentos

Att

Esta na pasta Documentos.

Muito Obrigado, ajudou muiiiittoooooooo...

Abraço

 
Postado : 25/11/2014 10:53 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Eu fico feliz em ajuda, se a dica foi útil, por favor, click na mãozinha!!

Att

 
Postado : 25/11/2014 12:52 pm
 ghuto_lima
(@ghuto_lima)
Posts: 70
Estimable Member
Topic starter
 

Alexandre.

Deu um problema aqui.....
No momento de salvar em .csv, ao invés de com Ponto e Virgula " ; " salvou em virgula " , ".
Sabe como mudar isso?

Abraço.

 
Postado : 25/11/2014 2:11 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico