PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → Apercu avant impression dans un objet OLE WORD
Apercu avant impression dans un objet OLE WORD
Iniciado por Lallau Olivier, jun., 23 2005 3:07 PM - 1 resposta
#1
Publicado em junho, 23 2005 - 3:07 PM
bonjour

on utilise la fusion de doc word avec la base hyperfile pour imprimer des documents et on aimerai avoir un aperçu dans word avant de lancer directement l'impression, quelle est la syntaxe :

ci joint le code d'impression :

word est un objet OLE dynamique = ObjetActif("Word.Application")
SI word=Null ALORS word=allouer un objet OLE "Word.Application"
word>>Visible=Faux // Word n'apparait pas a l'ecran
word>>DisplayAlerts = OLEFaux
//lecture du document
word>>Documents>>open(PARAM.CheminDoc+"\BonVisite.doc")

//recherche et remplace coordonnées du négociateur
word>>Selection>>Find>>Execute("<NEGO>",Faux,Vrai,Faux,Faux,Faux,Vrai,1,Faux,SansEspace(NEGO.Nom)+" "+SansEspace(NEGO.Prénom),2)

word>>Selection>>Find>>Execute// Impression
word>>PrintOut()
// Fermeture de word
word>>ActiveDocument>>close(False)
word>>Quit() // Fermeture de Word

merci d'avance
cordialement
#2
Publicado em junho, 23 2005 - 5:10 PM
Bonjour,

Pour le 1er document
word>>documents>>Item[1]>>PrintPreview()

ou

xxx = Word>>ActiveDocument()

xxx>>PrintPreview()


Cordialement,

C.AUBRY
→ Voltar para WINDEV 2024