abrir en excel sin vista protegida
Posted: Sat Aug 10, 2019 3:56 pm
Hola Amigos de Five tech
Agradecería si alguien me puede ayudar con un tema de apertura al generar reportes para excel, los archivo me salen en "vista protegida" para las nueva versiones de office 2010 y posteriores
se que estoy algo obsoleto,, me podira colaborar alguien y orientarme como evitar este impace, se los agradeceria
estas lineas aplico para generar un reporte para excel
espero sus ayuda, gracias de antemano
#Include "fivewin.ch"
#Include "tcbrowse.ch"
#include "FileXLS.ch"
static oFileXLS
DEFINE XLS FONT nFont2 NAME "Times New Roman" HEIGHT 10 UNDERLINE BOLD
CTITUL:=CTITUL+".XLS"
XLS oFileXLS FILE &CTITUL AUTOEXEC
CTITUL:="REPORTE"+".XLS"
XLS oFileXLS FILE &CTITUL AUTOEXEC
XLS 1 COL 1 WIDTH 12 OF oFileXLS
@ 1,1 XLS SAY "SOLICITUD" FONT nfont2 OF oFileXLS
nRow := 5
@ NROW,1 XLS SAY "pruebas" FONT nfont2 OF oFileXLS
ENDXLS oFileXLS
RETURN( .T. )
Agradecería si alguien me puede ayudar con un tema de apertura al generar reportes para excel, los archivo me salen en "vista protegida" para las nueva versiones de office 2010 y posteriores
se que estoy algo obsoleto,, me podira colaborar alguien y orientarme como evitar este impace, se los agradeceria
estas lineas aplico para generar un reporte para excel
espero sus ayuda, gracias de antemano
#Include "fivewin.ch"
#Include "tcbrowse.ch"
#include "FileXLS.ch"
static oFileXLS
DEFINE XLS FONT nFont2 NAME "Times New Roman" HEIGHT 10 UNDERLINE BOLD
CTITUL:=CTITUL+".XLS"
XLS oFileXLS FILE &CTITUL AUTOEXEC
CTITUL:="REPORTE"+".XLS"
XLS oFileXLS FILE &CTITUL AUTOEXEC
XLS 1 COL 1 WIDTH 12 OF oFileXLS
@ 1,1 XLS SAY "SOLICITUD" FONT nfont2 OF oFileXLS
nRow := 5
@ NROW,1 XLS SAY "pruebas" FONT nfont2 OF oFileXLS
ENDXLS oFileXLS
RETURN( .T. )