Verify if exists AcadLineType

[Anonymous]

Hello,

I've this code to verify if each Linetype Exists in acad.lin to create a layer.
I need to verify in two files (acad.lin and userlines.lin), how can i do that?

******************************************
LineTypeExists = False
For Each LineType In ThisDrawing.Linetypes
If UCase(LineType.Name) = UCase(TargetLineType) Then
LineTypeExists = True
Exit For
End If
Next LineType

If Not LineTypeExists Then
ThisDrawing.Linetypes.Load TargetLineType, "acad.lin"
End If
************************************

Best regards,
Antonio Miranda

[Anonymous]

Hello, I've this code to verify if each Linetype Exists in acad.lin to create a layer.
I need to verify in two files (acad.lin and userlines.lin), how can i do that? ******************************************
LineTypeExists = False

For Each LineType In ThisDrawing.Linetypes

If UCase(LineType.Name) = UCase(TargetLineType) Then
LineTypeExists = True
Exit For
End If

Next LineType

If Not LineTypeExists Then
ThisDrawing.Linetypes.Load TargetLineType, "acad.lin"
End If
************************************
Best regards,
Antonio Miranda