VBA Access

[axla]

Bonjour,

 

Voilà mon pb, je voudrais ouvrir un document word à partir d'un formulaire sous access et je n'y arrive pas

 

:decoiff: :decoiff:

 

Qui peut m'aider ?

[axla]

C'est Ok je viens de trouver.

[Yellow]

Tu peux même insérer des champs automatiquement en utilisant le script suivant:

 

 

 

 

 

Private Sub Lettre_Click()

' Enlever le commentaire suivant de Microsoft Access 97.

' DoCmd.RunCommand acCmdCopy

' Enlever le commentaire suivant de Microsoft Access 7.0.

' DoCmd.DoMenuItem acFormBar, acEditMenu, acCopy, , acMenuVer70

' Start Microsoft Word 97.

Set objWord = CreateObject("Word.Application")

With objWord

' Make the application visible.

.Visible = True

' Open the document.

.Documents.Open ("d:\Emplacement de ton document à ouvrir\nom de ton document.doc")

' Move to each bookmark and insert text from the form.

.ActiveDocument.Bookmarks("Nom du signet").Select

.Selection.Text = (CStr(Forms!Nom du formulaire Acces!Nom du champs à insérer))

 

 

End With

[billy]

Salut Axla

 

Post ta solution ça peut être intérressant pour d'autres personnes.

 

Merci

[axla]

désolé pour ce retard, voici donc comment j'airésoulu mon pb

 

Dim stAppName As String

 

stAppName = "Winword.exe c:\chemin du fichier +nom du document"

Call Shell(stAppName, 1)

[axla]

au fait , j'allais oublier merci de ton explication Yellow cela pourra me servir pour une autre appli. :yais: :yais:

[Yellow]

au fait , j'allais oublier merci de ton explication Yellow cela pourra me servir pour une autre appli.  :yais:  :yais:

Pas de quoi.

En fait ce script (trouvé sur un forum, mais malheureusement, je ne sais plus où), est je trouve effectivement très utile.

Tu peux non seulement ouvrir directement un doc, mais en plus insérer autant de champs, des photos ou des calculs intégrés dans ton formulaire directement dans un document Word mis en forme.

Tout cela d'un simple clic en créeant un bouton et en rentrant ce script dans "événement sur clic".

Pour créer des lettres types, des factures, etc. :

LE PIED !

:applaudir2: