A voir également:
- Extraire paragraphe d'un .doc en VB.NET
- .Doc - Guide
- Extraire une video youtube - Guide
- Extraire le son d'une vidéo - Guide
- Comment ouvrir un fichier doc ? - Guide
- Chaque paragraphe doit être espacé de 0,42 cm ou 12 pt du paragraphe qui suit - Guide
1 réponse
Utilisateur anonyme
Modifié par Lupin.PC4 le 14/02/2012 à 13:13
Modifié par Lupin.PC4 le 14/02/2012 à 13:13
Bonjour,
Je ne suis pas très fort avec le VBA de Word, toutefois je maitrise
assez bien la manipulation sous Excel.
Voici déjà un exemple de comment manipuler Excel,
la variante avec Word est relativement simple.
Ensuite il te faudra apprendre comment manipuler l'intérieur de Word.
(Voir lien OLE)
p.s. Il te faudra importer des espaces de noms relatif à Office.
Cdt
Lupin
Je ne suis pas très fort avec le VBA de Word, toutefois je maitrise
assez bien la manipulation sous Excel.
Voici déjà un exemple de comment manipuler Excel,
la variante avec Word est relativement simple.
Ensuite il te faudra apprendre comment manipuler l'intérieur de Word.
(Voir lien OLE)
Private Sub btn_CreerFichier_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btn_CreerFichier.Click
Dim appExcel As New Excel.Application
Dim wbExcel As Excel.Workbook
Dim wsExcel As Excel.Worksheet
Dim CheminFichier As String = "C:\Document\"
Dim CheminAcces As String = String.Empty
appExcel = New Excel.Application
wbExcel = appExcel.Workbooks.Add
wsExcel = DirectCast(wbExcel.Worksheets(1), Excel.Worksheet)
wsExcel.Range("A1").Value = "Lupin"
CheminAcces = String.Format("{0}{1}", CheminFichier, "Essai.xls")
wbExcel.SaveAs(CheminAcces)
appExcel.Visible = True
'wbExcel.Close()
'appExcel.Quit()
MessageBox.Show("Fichier créé", "Création", MessageBoxButtons.OK, MessageBoxIcon.Information)
End Sub
p.s. Il te faudra importer des espaces de noms relatif à Office.
Cdt
Lupin