1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
|
Variant vLine;
vWorksheet = vXLWorkbook.OlePropertyGet("Worksheets", 1);
// pour les donnees (1, 1, 200, 100) il faut lire X, Y, X1, Y1
// X, Y point de depart de la ligne X1, Y1 point d'arrivee de la ligne
// coordonnees de la ligne
vLine = vWorksheet.OlePropertyGet("Shapes").OleFunction("AddLine", 1, 1, 200,100);
// on parametre la ligne en fleche
vLine.OlePropertyGet("Line").OlePropertySet("EndArrowheadStyle", 2);
vLine.OlePropertyGet("Line").OlePropertySet("EndArrowheadLength", 2);
vLine.OlePropertyGet("Line").OlePropertySet("EndArrowheadWidth", 2);
// on modifie l'apparence de la fleche
vLine.OlePropertyGet("Line").OlePropertySet("Weight", 18); // epaisseur de la ligne
vLine.OlePropertyGet("Line").OlePropertyGet("ForeColor").OlePropertySet("SchemeColor", 22); // couleur de la ligne
vLine.OlePropertyGet("Line").OlePropertySet("Visible", false);
vLine.OlePropertyGet("Line").OlePropertySet("Visible", true); |
Partager