adrdown

Apesar do tempo, segue solução simples, atenção: a guia que deseja gerar o TXT precisa estar com o nome Extract, se entende o mínimo de VBA altere o nome código abaixo para o nome de sua guia, não me perguntem como funciona o código pois não sei, estou estudado ainda, peguei a solução de outro site em Inglês e adaptei para o que preciso, depois reduzi e fiz esta resumida abaixo que deve resolver para maioria das pessoas...

Códig VBA com a solução:

Sub Exportar_TXT()



     Application.ScreenUpdating = False

  

'Seleciona a guia Extract do Excel depois a célula A1
    Sheets("Extract").Select
    Range("A1").Select
    
    'Iniciar exportação txt via Print com texto exato mostrado em tela sem erro das aspas
    
    Dim Path As String
    Dim FileNumber As Integer
    Dim LR As Integer
    Dim LC As Integer
    
    Dim k As Integer
    Dim i As Integer

    LR = Worksheets("Extract").Cells(Rows.Count, 1).End(xlUp).Row
    LC = Worksheets("Extract").Cells(1, Columns.Count).End(xlToLeft).Column
    
    Path = ThisWorkbook.Path & "\Extract " & Format(Now(), "ddmmyyyy-hhmmss") & ".txt"
    FileNumber = FreeFile
    
    Open Path For Output As FileNumber
    
    For k = 1 To LR
    
        For i = 1 To LC
            
            If i <> LC Then
                Print #FileNumber, Cells(k, i),
            Else
                Print #FileNumber, Cells(k, i)
            End If
            
        Next i
        
    Next k
    
    Close FileNumber
    

' Caso deseja abrir o notepad imediatamente para conferir o txt gerado só retirar a linha comentada abaixo:

 
    'Shell "notepad.exe " & Path, vbNormalFocus



    Application.ScreenUpdating = True
    
    MsgBox "Extract*.txt salvo na pasta onde abriu este Excel!"
    
End Sub





********************************************



Algumas pessoas sugerem a solução abaixo onde se coloca o xlTextPrinter, porém aqui para mim não resolveu nada, o melhor usado neste exemplo foi o xlTextWindows porém em algumas planilhas ele continuava trazendo aspas em algumas linhas, quando eu terminar meus estudos provavelmente vou entender por que disso......

Código VBA ruim mas que funcionou em 90% dos meus casos:







Sub Exportar_TXT()



     Application.ScreenUpdating = False



'Seleciona a guia Extract do Excel depois a célula A1
    Sheets("Extract").Select
    Range("A1").Select



'Iniciar exportação txt via comando "salvar como"

    Dim lWorkBook As Workbook
    Dim lPlan     As Worksheet
    
    Set lWorkBook = Workbooks.Add
    
    Extract.Copy Before:=lWorkBook.Sheets(1)
    
    lWorkBook.SaveAs FileName:= _
        ThisWorkbook.Path & "\Extract " & Format(Now(), "ddmmyyyy-hhmmss") & ".txt", _
        FileFormat:=xlTextPrinter, CreateBackup:=False
        
    lWorkBook.Close SaveChanges:=False
       
    MsgBox "Extract*.txt salvo na pasta onde abriu este Excel!"
    
Sair:
    Set lWorkBook = Nothing



End Sub

Fonte do meu código VBA:

https://www.wallstreetmojo.com/vba-write-text-file/

Consegui achar a causa, tive de ir na tentativa e erro mesmo pois nunca ia localizar se continuasse achando que a falha era o driver de vídeo ou configuração do mesmo,

Uso o Cinnamon e estou acostumado a usar alguns miniaplicativos na barra de ferramentas, aqueles Applets Cinnamon, o problema só aparece quando instalo e habilito um Applet chamado "Multi-Core System Monitor", é basicamente um monitor de CPU, rede, RAM e etc

Depois de remover este "Multi-Core System Monitor" o videos tanto do Youtube quanto dos players como Smplayer exibem os videos sem congelamentos ou travamentos,

Em Inglês caso outros procurem pela mesma solução:

On my Fedora 22 with Cinnamon 2.6

After removing this Applet Cinnamon: "Multi-Core System Monitor", my videos, movies, both from Youtube as the players like SMPlayer display the video without freezes or crashes.

Não é flash, no HTML5 tambem trava, todos os videos travam, o video é vai tocando dando congeladas constantemente,

Rodei o comando inxi -b

saida

Excelente dica o player Kodi, porém mesmo com ele meu problema aqui os videos continua, e ao executar videos no youtube ou Flash de qualquer site os videos também ficam congelando, alguem conseguiu resolver?

Sistema Operacional - Korora 22 Selina (x86-64)  <-- é um Fedora 22 com todos extras como codecs e etc

Versão Cinnamon = 2.6.13

Kernel = 4.1.4

Processador = Core i7 2.2Ghz

Mem. RAM = 8GB

VGA onboard Intel e AMD Radeon HD 7730M