abrir en excel sin vista protegida

abrir en excel sin vista protegida

Postby evert mora » 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. )
evert mora
 
Posts: 3
Joined: Wed Sep 29, 2010 1:14 pm
Location: colombia

Re: abrir en excel sin vista protegida

Postby cnavarro » Mon Aug 12, 2019 10:36 am

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
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6500
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: abrir en excel sin vista protegida

Postby evert mora » Tue Aug 13, 2019 4:02 am

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
evert mora
 
Posts: 3
Joined: Wed Sep 29, 2010 1:14 pm
Location: colombia


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 86 guests