How to find area of earth works between to lines in autocad
Download as PPTX, PDF0 likes884 views
This document provides instructions for using macros in AutoCAD to summarize earthwork areas between two lines. The macros find the intersection points between lines, calculate cut and fill areas, and export the area data to a quantity table and Excel spreadsheet. The macros automate repetitive cross-section analysis tasks, allowing an engineer to quickly process multiple sections within a single AutoCAD drawing.
How to find area of earth works between to lines in autocad
- 1. How to find area of earth works between 2 lines in AutoCAD by using Macro VBA
- 2. A : Find intersection point & makes stripped area of Cut and Fill
- 3. 1. Draw line as OGL in layer "OGL" 1
- 4. 2. Draw line as Road template in layer “Road template" 2
- 5. 3. Draw vertical line as Road center line in layer “CL" 3
- 6. 4. Draw horizontal line as Datum line layer “Datum" 4
- 7. 5. Draw text as Datum value in Layer “Datum-Txt" 5
- 8. 6. Draw text as left & right of side slope in layer “Side slope" 6L 6R
- 9. 7. Draw text as Station in layer “STA-Txt" 7
- 11. 8. Load Macro, Menu Tools>Macro>Load Project> Select “FindAreaBetween2Lines”
- 12. 9. Run Macro, Menu Tools>Macro>Macro> (or Alt+F8) Select “FindAreaBetween2Lines” then Run
- 13. 10. Macro will find :a) the intersection at left and right side and draw the intersection line b) the area of Cut and Fill between 2 lines and draw the polylines
- 14. B : Put areas to Quantity Table
- 15. 11. Draw table as block reference in layer “Table" 11
- 16. 12. Load Macro, Menu Tools>Macro>Load Project> Select “FindAreatoTable”
- 17. 13. Run Macro, Menu Tools>Macro>Macro> (or Alt+F8) Select “FindAreatoTable” then Run
- 18. 14. Macro will find :a) All cut area in this section and put in table as layer “aCut” b) All Fill area in this section and put in table as layer “aFill”
- 19. C : Transfer data to Excel
- 20. 15. Load Macro, Menu Tools>Macro>Load Project> Select “FindAreatoExcel” Note : Please open Microsoft Excel before run this macro
- 21. 16. Run Macro, Menu Tools>Macro>Macro> (or Alt+F8) Select “FindAreatoExcel” then Run
- 22. 17. Select Sheet name to Transfer data to Excel Default is “Sheet1” then Click Export to Excel
- 23. 18. The data will transfer to Excel You can do anything such as find the Volume of Earth works
- 24. 19. You can do many Cross section in one drawing and run this macro in one time…