Ouvrir word
Description
ce petit code vous permez d'ouvrir Word et d'y ecrire quelque mots
N'oubliez pas de rajouter la reference Microsoft Word 9.0 object librery
(menu ->Projet -> references choisire le reference Microsoft Word 9.0 object librery)
pour ce code ajouter une textbox et un bouton
N'oubliez pas de rajouter la reference Microsoft Word 9.0 object librery
(menu ->Projet -> references choisire le reference Microsoft Word 9.0 object librery)
pour ce code ajouter une textbox et un bouton
Source / Exemple :
Private Sub Command1_Click() Dim DocWord As Word.Document Dim AppWord As Word.Application Set AppWord = New Word.Application AppWord.ShowMe AppWord.Visible = True 'Ajoute un document AppWord.Documents.Add With AppWord.Selection .TypeParagraph .TypeText Text:="Procédure pour écrire dans Word " .TypeParagraph .TypeText Text:="nariel1 is the best" .TypeParagraph .TypeParagraph .TypeText Text1 End With End Sub
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.