Bonjour à tous
Je coince dans un programme car je n'arrive pas à fractionner (de la fonction fractionner de word) des cellules d'un tableau word à partir de ma macro excel pour y inserer du texte. j'ai cherché sur le forum mais ne trouve pas d'exemple pour cette fonction...
voici un bout de mon programme pour exemple:
wordApp.Visible = True
Set WordDoc = wordApp.Documents.Open(vDossierSource & "\" & lien)
With WordDoc.ActiveWindow.Selection
With WordDoc.Tables(1)
.cell(3, 1).Select
Selection.Cells.Split NumRows:=2, NumColumns:=1, MergeBeforeSplit:=False
.cell(4, 2).Range.InsertAfter Sheets("Feuil1").Range("b" & i).Value
End With
End With
et je joins également mon ficher word...
si quelqu'un à une proposition..... je prend!!
merci à tous
Je coince dans un programme car je n'arrive pas à fractionner (de la fonction fractionner de word) des cellules d'un tableau word à partir de ma macro excel pour y inserer du texte. j'ai cherché sur le forum mais ne trouve pas d'exemple pour cette fonction...
voici un bout de mon programme pour exemple:
wordApp.Visible = True
Set WordDoc = wordApp.Documents.Open(vDossierSource & "\" & lien)
With WordDoc.ActiveWindow.Selection
With WordDoc.Tables(1)
.cell(3, 1).Select
Selection.Cells.Split NumRows:=2, NumColumns:=1, MergeBeforeSplit:=False
.cell(4, 2).Range.InsertAfter Sheets("Feuil1").Range("b" & i).Value
End With
End With
et je joins également mon ficher word...
si quelqu'un à une proposition..... je prend!!
merci à tous
Pièces jointes
Dernière édition: