Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.

'Sestaveni kusovniku
Dim table As New List(Of String())
table.Add({"1", "Part1", "MainAssembly" })
table.Add({"2", "Part2", "MainAssembly" })
 
'Zapis kusovniku do Excelu
For r = 0 To table.Count-1
 Dim row = table(r)
 GoExcel.CellValues("C:\Temp\TestFile.xlsx", "List1", "A"&r+1, "C"&r+1) = row
Next
 
'Ulozit, zavrit
GoExcel.Save
GoExcel.Close