bortot Posted March 26, 2023 Report Share Posted March 26, 2023 A PLANILHA DEPOIS DE ALTERADA COM VALORES DAS CELULAS NAO SUBESCREVE A ORIGINAL CASO NAO FOR SALVA E FECHADA PELO EXCEL DA MICROSOFT TRECHOS DA PROGRAMACAO: oExcel:= TOleauto():New( "Excel.Application") oExcel:Workbooks:Open(endereco file.xls) ALTERACOES NAS CELULAS oExcel:Visible = .F. oExcel:AlertBeforeOverwriting = .F. oExcel:DisplayAlerts = .F. oExcel:Workbooks:Close() oExcel:Quit() Quote Link to comment Share on other sites More sharing options...
kapiaba Posted March 26, 2023 Report Share Posted March 26, 2023 https://www.lawebdelprogramador.com/foros/Clipper-FiveWin/1333960-Como-cierro-un-xls-que-exporte.html https://forums.fivetechsupport.com/viewtopic.php?f=6&t=18759 https://forums.fivetechsupport.com/viewtopic.php?f=3&t=35814 https://groups.google.com/g/comp.lang.xharbour/c/Ta3nHXXp3nE/m/PkieUTP24kkJ https://www.lawebdelprogramador.com/foros/Clipper-FiveWin/1343289-CERRAR-XLS-luego-de-exportar-DBF.html Regards, saludos. Quote Link to comment Share on other sites More sharing options...
ADutheil Posted April 2, 2023 Report Share Posted April 2, 2023 Veja se isso ajuda: oExcel:ActiveWorkbook:CheckCompatibility := .F. oExcel:ActiveWorkbook:SaveAs( "nome do arquivo que quer salvar" ) Quote Link to comment Share on other sites More sharing options...
kapiaba Posted April 2, 2023 Report Share Posted April 2, 2023 https://forums.fivetechsupport.com/viewtopic.php?f=3&t=24276 https://forums.fivetechsupport.com/viewtopic.php?f=3&t=29989 https://github.com/manuelcalerosolis/Gestool/blob/master/prg/Texcelsxh.prg Regards, saludos. Quote Link to comment Share on other sites More sharing options...
Eric.Developer Posted April 2, 2023 Report Share Posted April 2, 2023 Acho que vocês se esqueceram do principal, salvar: oExcel:ActiveWorkbook:Save() Contatos profissionais: Site | Facebook | YouTube Harbour Xailer Developers Em 26/03/2023 at 10:31, bortot disse: A PLANILHA DEPOIS DE ALTERADA COM VALORES DAS CELULAS NAO SUBESCREVE A ORIGINAL CASO NAO FOR SALVA E FECHADA PELO EXCEL DA MICROSOFT TRECHOS DA PROGRAMACAO: oExcel:= TOleauto():New( "Excel.Application") oExcel:Workbooks:Open(endereco file.xls) ALTERACOES NAS CELULAS oExcel:Visible = .F. oExcel:AlertBeforeOverwriting = .F. oExcel:DisplayAlerts = .F. oExcel:Workbooks:Close() oExcel:Quit() Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.