1type
2  XlLineStyle = (xlLineStyleNone = -4142, xlDouble = -4119, xlDot = -4118, 
3    xlDash = -4115, xlContinuous = 1, xlDashDot = 4, xlDashDotDot = 5, 
4    xlSlantDashDot = 13);

Или

01type
02  XlLineStyle = TOleEnum;
03const
04  xlLineStyleNone = $FFFFEFD2;
05  xlDouble = $FFFFEFE9;
06  xlDot = $FFFFEFEA;
07  xlDash = $FFFFEFED;
08  xlContinuous = $00000001;
09  xlDashDot = $00000004;
10  xlDashDotDot = $00000005;
11  xlSlantDashDot = $0000000D;

Элементы перечисления:

Имя	Значение	Назначение
xlLineStyleNone	-4142
xlDouble	-4119
xlDot	-4118
xlDash	-4115
xlContinuous	1
xlDashDot	4
xlDashDotDot	5
xlSlantDashDot	13