Propriété LineFormat.InsetPen (Excel)

  • Article

Renvoie ou définit une valeur indiquant si les lignes sont dessinées à l’intérieur des limites de la forme spécifiée. Lecture-écriture.

Syntaxe

expression. InsetPen

Expression Variable qui représente un objet LineFormat .

Valeur renvoyée

MsoTriState

Remarques

msoTrue (-1) si des lignes sont dessinées à l’intérieur des limites de la forme; sinon, msoFalse (0).

Exemple

L’exemple de code suivant ajoute deux rectangles à la feuille de calcul active, le premier avec ses lignes dessinées à l’intérieur de ses limites et le second avec ses lignes dessinées sur ses limites.

Dim shpNew As Shape 
 
With ActiveSheet.Shapes 
 Set shpNew = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=200, Top:=150, Width:=150, Height:=100) 
 With shpNew.Line 
 .Weight = 24 
 .InsetPen = msoTrue 
 End With 
 
 Set shpNew = .AddShape(Type:=msoShapeRectangle, _ 
 Left:=200, Top:=300, Width:=150, Height:=100) 
 With shpNew.Line 
 .Weight = 24 
 .InsetPen = msoFalse 
 End With 
End With

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.