Is there no problem if the script is executed via application like Excel? I think that VBScript is a typeless language. ![]() MsgBox "Longeur " & (Round((TotalLength / 72), 4)) & " " & "Nombre de points " & numPointMi2 & " " & i & " de " & endIndex Set FirstMi2 = PointMi2(Ligne) ' ERROR MISMATCH TYPEĮachLength = BezierLength(dPoint1X, dPoint1Y, dPoint2X, dPoint2Y, dPoint3X, dPoint3Y, dPoint4X, dPoint4Y) Set appRef = CreateObject("6")įor Ligne = 1 To (numPointMi2 - 1) Step 1 'If I do not dim all point as Double then I cannot use my Public Function BezierLength(dPoint1X As Double. THE ERROR IS ON THIS LINE BELOW set FirstMi2 = PointMi2(Ligne) ' ERROR MISMATCH TYPEĭim FirstMi2 As Illustrator.PathPoint 'if I write only Dim FirstMi2 then the same error will be at the next line Set NextMi2 = PointMi2(Ligne + 1)ĭim NextMi2 As Illustrator.PathPoint 'if I write only Dim NextMi2 then the same error will be at the next line dPoint1X = FirstMi2.Anchor(0)ĭim dPoint1X As Double 'if I write only Dim dPoint1X then the same error will be at the next line dPoint1Y = FirstMi2.Anchor(1) Maybe somebody may help me to solve this problem below, in reality I have hundred of script with the same mismatch type error ![]() ![]() This script do not work on Illustrator 64 bit but no problem on illustrator 32 bit until last week, no library or reference missing. I am running a script for the last 10 years without problem and suddenly it doesn't work
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |