I'm not sure that this code is very usefull, but I enjoyed in writing it !!!!!
Sub main()
Set EX = CreateObject("Excel.Application")
Set xl = CreateObject("Excel.sheet")
xl.Application.Workbooks.Open "C:\Tests\ellipse points creator v2.xls"
xl.quit
End Sub
You just have to execute the script (write the good path for the excel sheet...), then type values and save the xyz file. You import it as XYZ file and create vector points, it's done...
This version of ellipse point creator creates points regulary spaced around ellipse, the previous version did not.
It displays an error, but it works fine if you cancel it... If some one can shift this error, it will be better...
A new version for this new year, which calculates points for an ellipse // to Z plane, with offsets on center and on the angle.
Sub main()
Set EX = CreateObject("Excel.Application")
Set xl = CreateObject("Excel.sheet")
xl.Application.Workbooks.Open "C:\(your path where execute !)\ellipse points creator v2 MR2.xls"
xl.quit
End Sub
I've got it !!!!!
The V3 of this excel sheet works, it helps you to create XYZIJK points for 3D ellipse cylinder or taper (Excuse me Lambo, it was very long to do !!!!!).
You can run it automatically like this (type the good folder directory) :
Sub main()
Set EX = CreateObject("Excel.Application")
Set xl = CreateObject("Excel.sheet")
xl.Application.Workbooks.Open "C:\Tests\ellipse points creator v3.xls"
xl.quit
End Sub
Ask me your questions, I will try to help you...
I found an error in a type of calculation, so I give another version !
I saw that the Excel sheet doesn't work under Windows 7, I will try to improve this point...
I changed the auto run, for those who doesn't like it : you just have to read "read me".
A new version (once again !) with a bug correction in taper calculation (again ? : this time, it's correct and checked !), an "enhancement" in the size (I replaced a .BMP by a .JPG), and it should work now with vista and windows 7. I didn't try it with Excel2007.
You have avoided the 4.0 release, here's the 4.1 !
The major "enhancement" is the direct measurement of the points, in PC-DMIS from Excel !
You just have to write the good folder in the script to execute the "macro".
I think it should be wise to test it off-line !!!!!