"autore: rossano praderi
'creato: 07/02/2024
“************************************************************************************************************************************************************************************************************************************************************************************************************
“Geçmiş yolunu aşağıdaki düzenleme csvpath ile değiştirebilirsiniz - varsayılan olarak yol aynı.
'csvpath = ("c:\inventor\") “Eğer yolu değiştirirseniz, sonunda bir \ tutmak unutmayın
csvpath = string.concat (budoc.path, "\")
“************************************************************************************************************************************************************************************************************************************************************************************************************
'Aggiunto variabili per semplificazione
stl = "strutturata - holdti i livelli"
ssl = "strutturata - singolo livello"
sp = "solo katılımcısı"
Buapplication.activedocumenttype = documenttypeenum.kassemblydocumentobject O zaman sonra
dim odoc as assemblydocument = thisapplication.activedocument
bom = odoc.componentdefinition.bom
bomexporter = giriş listesi kutusu ("selezionare di bom da esportare: ", yeni string() { "", stl, "", ssl, "", sp }, d0, başlık:= "bom ihracat ", liste adı: = "tipo bom"
Eğer bomexporter <> ""
dim obomview as bomview
seçin case bomexporter
Vaka
" strutturata holdti i livelli
obom.kondview first level only = false
obom.yapısal olarak kullanılabilir = gerçek
obomview = obom.bomviews.item ("yapılan) 'Doğruficare con versione italiananana
Vaka
" strutturata Primo livello
obom.kondview first level only = true
obom.yapısal olarak kullanılabilir = gerçek
obomview = obom.bomviews.item ("yapılan) 'Doğruficare con versione italiananana
vaka sp
Yalnız katılımcı
obom.parts Onlyviewential = true
obomview = obom.bomviews.item("parts only) 'Onlyficare con versione italianananana
son seçim
“Ime del file cambia ikinci bir della tipologia di bom scelta
csvpath = string.concat(csvpath, thisdoc.filename(false), "_", bomexporter, "xls")
Deneyin
obomview.export(csvpath, koidexcelformat)
Sistem olarak eski yakalamak. istisna istisna istisna istisna istisna istisna istisna istisna istisna istisna
Mesajbox.show (ex.message)
Sonunda deneyin
Sonunda, eğer sona erirse
Başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka
Mesajbox.show("devi essere in un assieme per esportare la lista materiali (bom)", "ilogic ihracat")
Sonunda, eğer sona erirse