Bonsoir, (23 h)
Et un champ mémo?.. 6400 caractères.
Pour word il ne faut pas oublier de référencer cette librairie:
-->Alt + F11
Menu outils , références.
On coche la ligne : Microsoft Word nn.0 Object Library
Puis on enregistre en cliquant sur l'icône disquette.
Le formulaire en question a un champ répondant au doux nom de --> TonChampTexte
Dans lequel est inscrit le nom du document word qu'on veut créer.
Sur un bouton de commande baptisé--> cmdWord :
CODE
Private Sub cmdWord_Click()
On Error Resume Next
Dim strNom As String
strNom = Me.TonChampTexte
Dim w_App As New Word.Application
With w_App
.Visible = True
.Documents.Add
.ActiveDocument.SaveAs strNom
'Si on veut fermer
'.Quit
End With
Set w_App = Nothing
End Sub
Cordialement.