CAD Fórum : ilogic automatická tvorba DWG https://www.cadforum.cz/forum/ Fri, 03 Jul 2026 08:11:26 +0000 Thu, 03 Oct 2013 15:32:13 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=18019 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[ilogic automatická tvorba DWG : Zkuste makro z tipu:http://w...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=18019&PID=80824&title=ilogic-automaticka-tvorba-dwg#80824 Autor: Vladimír Michl
Předmět: 18019
Zasláno: 03.říj.2013 v 15:32

Zkuste makro z tipu:
http://www.cadforum.cz/cadforum/ukladani-dwg-kopie-idw-vykresu-pojmenovane-podle-revize-tip9476
]]> Thu, 03 Oct 2013 15:32:13 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=18019&PID=80824&title=ilogic-automaticka-tvorba-dwg#80824 <![CDATA[ilogic automatická tvorba DWG : Dobrý den, pomocí nástroje ilogic...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=18019&PID=80820&title=ilogic-automaticka-tvorba-dwg#80820 Autor: marik.r
Předmět: 18019
Zasláno: 03.říj.2013 v 14:37

Dobrý den,

pomocí nástroje ilogic automaticky vytvářím DWG soubory při ukládání idw výkresů tímto pravidlem:

'check file type
If ThisDoc.Document.DocumentType <> kDrawingDocumentObject Then
MessageBox.Show("This file is not a drawing file.", "iLogic")
Else
ThisDoc.Document.SaveAs(ThisDoc.ChangeExtension(".dwg"),True)
MessageBox.Show(ThisDoc.FileName(False)& ".dwg Saved!! " & vbCrLf & vbCrLf & ThisDoc.Path , "Save As")
End If

Věděl by někdo, jak pravidlo upravit, aby se mi DWG soubor ukládal ve tvaru 

"název idw souboru"-"čílo revize".dwg

např: součástka.idw -->  součástka-A.dwg

"A" je označení revize

Díky

]]> Thu, 03 Oct 2013 14:37:50 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=18019&PID=80820&title=ilogic-automaticka-tvorba-dwg#80820