Page 1 of 1

abrir en excel sin vista protegida

Posted: Sat Aug 10, 2019 3:56 pm
by evert mora
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. )

Re: abrir en excel sin vista protegida

Posted: Mon Aug 12, 2019 10:36 am
by cnavarro
evert mora wrote:Hola Amigos de Five tech

#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. )
Hola, no entiendo por qué llamas dos veces al comando XLS oFileXLS .....
Al margen de eso, prueba también sin la clausula AUTOEXEC, si te funciona, veremos cómo hacer

Re: abrir en excel sin vista protegida

Posted: Tue Aug 13, 2019 4:02 am
by evert mora
Gracias Navarro
El error de vista protegida la mayoria de las veces la elimino cuando en Excel adiciono en archivos de confianza la carpeta donde queda el reporte que genera la aplicación, pero debe haber la forma que desde la instrucciones se abra sin dar el mensaje de vista protegida y no tener que tener que parametrizar desde Excel,

hice lo q me pedistes
el tema esta es que esta sentencia debe ser completa de esa forma de lo contrario no me funciona
XLS oFileXLS FILE "reporte.xls" AUTOEXEC
Si elimino autoexec no se ejecuta y si elimino Ofilexls , sale error

si existe otro camino para generar reportes para excel del cual utilices y no te de mensaje de vista protegida para versiones desde 2013 o superior por favor podrías enviarme un ejemplo ,me orientas como aplicarla para hacer la prueba.
saludos