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. System: Host: adrnot Kernel: 4.1.6-200.fc22.x86_64 x86_64 (64 bit) Desktop: Cinnamon 2.6.13 Distro: Fedora release 22 (Twenty Two) Machine: System: Dell product: Inspiron 7520 v: A11 Mobo: Dell model: 0DNMM8 v: A01 Bios: Dell v: A11 date: 02/20/2014 CPU: Quad core Intel Core i7-3632QM (-HT-MCP-) speed/max: 1200/3200 MHz Graphics: Card-1: Intel 3rd Gen Core processor Graphics Controller Card-2: Advanced Micro Devices [AMD/ATI] Chelsea LP [Radeon HD 7730M] Display Server: Fedora X.org 117.2 drivers: ati,radeon,intel (unloaded: fbdev,vesa) Resolution: [email protected] GLX Renderer: Mesa DRI Intel Ivybridge Mobile GLX Version: 3.0 Mesa 10.6.3 (git-ccef890) Network: Card-1: Realtek RTL8111/8168/8411 PCI Express Gigabit Ethernet Controller driver: r8169 Card-2: Qualcomm Atheros AR9485 Wireless Network Adapter driver: ath9k

Não é flash, no HTML5 tambem trava, todos os videos travam, o video é vai tocando dando congeladas constantemente, Rodei o comando inxi -b saida System: Host: localhost.localdomain Kernel: 4.1.4-200.fc22.x86_64 x86_64 (64 bit) Desktop: Cinnamon 2.6.13 Distro: Korora release 22 (Selina) Machine: System: Dell product: Inspiron 7520 v: A11 Mobo: Dell model: 0DNMM8 v: A01 Bios: Dell v: A11 date: 02/20/2014 CPU: Quad core Intel Core i7-3632QM (-HT-MCP-) speed/max: 2624/3200 MHz Graphics: Card-1: Intel 3rd Gen Core processor Graphics Controller Card-2: Advanced Micro Devices [AMD/ATI] Chelsea LP [Radeon HD 7730M] Display Server: Fedora X.org 117.2 drivers: ati,radeon,intel (unloaded: fbdev,vesa) Resolution: [email protected] GLX Renderer: Mesa DRI Intel Ivybridge Mobile GLX Version: 3.0 Mesa 10.6.3 (git-ccef890) Network: Card-1: Realtek RTL8111/8168/8411 PCI Express Gigabit Ethernet Controller driver: r8169 Card-2: Qualcomm Atheros AR9485 Wireless Network Adapter driver: ath9k Card-3: Atheros Drives: HDD Total Size: 1250.3GB (44.2% used) Info: Processes: 246 Uptime: 27 min Memory: 1582.5/7859.8MB Client: Shell (bash) inxi: 2.2.25

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