Utilisation intelligente de word pour realiser les etats

Soyez le premier à donner votre avis sur cette source.

Vue 13 798 fois - Téléchargée 1 913 fois

Description

Il s'agit d'une petite classe simple et intelligente qui permet d'utiliser Word pour l'édition des états.

Domaine application:
- Secretariat : Impression des lettres types et documents avec des espaces à remplir
- Developpement : Tout état basé sur un recordset à un seul enregistrement

Prerequis:
- Ouvrir Word
- Construire l'état avec toutes les mises en forme, aussi beau qu'on le souhaite
- Définir les signets dans le document. (Remplacer les ... par des signets)
- Enregistrer le document et mettre un mot de passe si besoin

Source / Exemple :


Tout est dans le Zip, mais l'utilisation est aussi simple que le code ci-dessous

Private Cls1 As ClsManageWordBookmarks

Private Sub CmBouttons_Click(Index As Integer)
    With Cls1
        Select Case Index
            Case 0: .PrintDoc
            Case 1: .ViewDoc
            Case 2: .SaveAs [Text1]
        End Select
    End With
End Sub

...

Conclusion :


Ce concept a beaucoup d'applications, par exemple la traduction des états devient plus facile suivant ce principe, ...

Il s'agit d'une idée originale qui me trotte depuis dans la tête que je partage avec vous.
J'aimerais bien avoir des suggestions pour l'amélioration du code et surtout pour la rendre plus rapide.

ASIMENGO

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

mhaido23
Messages postés
3
Date d'inscription
samedi 29 mai 2010
Statut
Membre
Dernière intervention
15 juin 2010
-
salut je suis débutant dans vb et je trouve ton code satisfait a mes besoins mais j'ai un problème avec ce code c'est que les dernier champ de votre base de donnée se s'écrivent dans la même ligne;si vous pouvez m'aider je serrai Reconnaissant.
cs_asimengo
Messages postés
281
Date d'inscription
jeudi 24 mars 2005
Statut
Membre
Dernière intervention
18 mars 2009
-
@GAEL51: Il te suffit de compiler la classe dans une dll et tu pourras l'utiliser ou tu veux.
cs_Gael51
Messages postés
6
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
13 avril 2009
-
Super idée,félicitation.

Quelqu'un pourrait il faire quelque chose de semblable en .net ?

ça serait super
cs_asimengo
Messages postés
281
Date d'inscription
jeudi 24 mars 2005
Statut
Membre
Dernière intervention
18 mars 2009
-
@Peug: Merci pour la note, qui a dit que ce n'était pas flatteur, lol

@Renfield: Merci pour cet astuce, effectivement c'est idéal.

Mais en fait je savais ce que je voulais mais pas les instructions qui vont avec, alors avec une declaration explicite (je ne sais comment dire le contraire du late binding), je suis assisté en codant et je peux parcourir toutes les propriétés et méthodes des objects, ainsi savoir ce qui est possible.
Au fait Renf, maintenant que t'es là, y'a pas de lacunes d'utilisation de ressources que tu as détecté là. Je pense que l'algo c'est OK, mais j'aimerai pouvoir ne pas charger word en entier mais juste utiliser les dll dont j'ai besoin pour imprimer, visualiser et enregistrer en .doc ou .rtf
Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
57 -
11 et superieur géré, si la reference 11.0 est choisie.

si pas d'office => crash

l'idéal est d'utiliser plutot du 'late binding'...
Dim oApp As Variant
Dim oDocument as Variant
Set oApp = CreateObject("Word.Application")
...

ainsi, pas de soucis de version

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.