Pilotage Word problème de fusion
Bonjour,
je souhaite piloter Word avec D7. un problème se pose lors de la fusion de 3 cellules d'un tableau, voici le code que j'emploi
Code:
1
2
3
4
5
6
7
|
TableauLTV.cell(2,1).select;
LLine:= wdLine;
Lindex:= 2;
LExtend:= wdExtend;
WordApplication1.Selection.MoveDown(LLine,Lindex,LExtend);
WordApplication1.Selection.Cells.Merge; |
je sélectionne donc 3 cellules et les fusione, cependant un problème connu de MicroSoft apparait parfois lorsque Word est non visible :
http://support.microsoft.com/kb/235876/fr
ce site recommande :
Code:
1
2
3
4
5
| doc.Range(Start:=doc.Tables(1).Cell(1, 1).Range.Start, _
End:=doc.Tables(1).Cell(3, 1).Range.End).Select
à la place de
Selection.MoveDown wdLine, 2, wdExtend |
je tente d'adapter en D7:
Code:
1
2
3
4
5
6
|
TableauLTV.cell(2,1).select;
LLine := DocWord.Tables.item(10).Cell(2,1);
Lindex:= DocWord.Tables.item(10).Cell(4,1);
DocWord.Range(LLine,Lindex).select; // error ici argument incorrect !!
WordApplication1.Selection.Cells.Merge; |
mais j'ai une erreur ici : DocWord.Range(LLine,Lindex).select; // error ici argument incorrect !!
