Olá,
Segue!
Criação da MACRO para formação do CSV
Cod resultante:
Para salvar o arquivo em formato Excel:
Código:
Obs: no print não aparece tudo, mas segue a o que não aparece abaixo do print:
Vendas%20Formatado - " & Format(Now(), "yyyy-mm-dd-hh-mm-ss") & " .xlsx" _
Ficando assim:
