PC SOFT

FORUMS PROFESSIONNELS
WINDEV, WEBDEV et WINDEV Mobile

Accueil  |  Messages récents  | Connexion  |   | Français  FR
Accueil → WINDEV 2024 → Signet et condition dans un Document Word
Signet et condition dans un Document Word
Débuté par THIERRY TILLIER, 15 jan. 2020 14:45 - 1 réponse
#1
Membre enregistré
1 144 messages
Popularité : +50 (142 votes)
Posté le 15 janvier 2020 - 14:45
Bonjour à tous

Voici mon petit soucis qui devrait faire s'agiter quelques neurones :

Mon application WinDev utilise des "maquettes" Word, dont le contenu est alimenté par les données d'une requête.
Tout cela fonctionne très bien.

Mes "maquettes" Word contiennent des formules de condition de ce type :

{ IF { MonSignet } = "0" "Mon texte si 0" " Mon texte si pas 0" \* MERGEFORMAT

MonSignet ici, désigne un champ de saisie Word (Onglet Développeur champ hérité)

et code pour alimenter le document :
MonDocument est un Document
MonDocument=CheminFichierMaquetteTEMP

HExécuteRequêteSQL(MaSourceDeDonnees,Connexion_mdph,hRequêteSansCorrection,MonCourrier.m_REQUETE)
POUR TOUT MaSourceDeDonnees
MaListeRubrique=HListeRubrique(MaSourceDeDonnees)
POUR TOUTE chaîne sRubrique de MaListeRubrique SEPAREE PAR RC
MonDocument.Remplace("%"+sRubrique+"%",{MaSourceDeDonnees..Nom+"."+sRubrique,indRubrique})
sMaValeur est une chaîne={MaSourceDeDonnees..Nom+"."+sRubrique,indRubrique}

POUR TOUT uUnSignet,NomSignet de MonDocument.Signet
SI NomSignet=sRubrique ALORS
uUnSignet..Texte=sMaValeur
//Trace(NomSignet +" = "+uUnSignet..Texte)
FIN
FIN
FIN
FIN



Le soucis c'est que la condition ne s'exécute jamais alors que dans Word cela fonctionne bien. Petite précision pour que cela fonctionne dans WORD le document doit être en modification restreinte, option remplissage de formulaire autorisé.

Quelqu'un aurait-il une idée pour l'exécution de ma formule par programmation WINDEV ?
#2
Membre enregistré
1 144 messages
Popularité : +50 (142 votes)
Posté le 20 janvier 2020 - 11:20
Pas d'idée ?
→ Revenir à WINDEV 2024