Data z Excelu do AutoCAD-u
Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD 360, prohlížečů, DWG a DWF, Design Review, Navisworks, nadstavby, 123D, A360 a cloud Autodesk 360
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=5065
Datum vytištění: 14.kvě.2026 v 06:58
Téma: Data z Excelu do AutoCAD-u
Odeslal: be_em
Předmět: Data z Excelu do AutoCAD-u
Datum odeslání: 24.srp.2007 v 09:06
mám v Exceli vytvorený kompletný zoznam častí projektovej dokumentácie (zoznam textových správ, zoznam výkresov, označenie výkresu, počet A4, ... atď). Dajú sa tieto údaje prepojiť s AutoCAD-om (2004), tak aby v každej popiske výkresu (tabuľke) v Layout-e boli tieto údaje zobrazené? Priložil som aj približný nákres o čo mi vlastne ide  
|
Odpovědi:
Odeslal: PepaR
Datum odeslání: 24.srp.2007 v 09:56
|
Je možné použít něktrou z nadstavbových aplikací, např. Excellink nebo to propojit jako OLE objekt (zde ale bývají problémy se zobrazením).
Pokud byste nepotřeboval propojení, tak je možné vložit data z excelu jako entity nebo tabulku AutoCADu. ------------- PepaR https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 10:02
|
... ja nechcem vkladať celú tabuľku do AutoCAD-u. V Excelovskej tabuľke je cca 200 výkresov, podľa jednotlivých stavebných súborov, aktivít, SO, PS.
Proste chcem vložiť určitý údaj z Excelu na konkrétne miesto v tabuľke do AutoCAD-u a na inom mieste zase iný údaj na iné miesto v tabuľke. Dá sa to vôbec? |
Odeslal: PepaR
Datum odeslání: 24.srp.2007 v 10:15
|
Pokud Vám jde jen o razítka a vyplnění názvů zakázek, čísle výkresů a dalších věcí, tak doporučuji použít vlastnosti sady listů, pokud byste to chtěl brátz excelu a mít neusrále propojené, tak není jiné cesty než nadstavbové aplikace např. Excellink, které jsou ale placené. ------------- PepaR https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 10:18
| ... no myslím že o toto mi ide, musím to ale vyskúšať, potom si budem na istom ... len mám anglickú verziu, prosím len mi ešte prezradte ako sa táto funkcia volá. ďakujem. |
Odeslal: PepaR
Datum odeslání: 24.srp.2007 v 10:22
|
Je to Spávce sady listů, kde lze zadat uživatelské vlastnosti a na ně se odkázat posléze textovým pole, ale nevím od které verze je funkce implementována v AutoCADu. Mám, ale od profesmanů vyzkoušeno, že ve 2005 by již měla být. ------------- PepaR https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz |
Odeslal: zisoun
Datum odeslání: 24.srp.2007 v 12:41
|
To co asi potřebujete je v tipu 5367.
------------- Zisounek |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 13:35
| no niečo v toto zmysle. Ďakujem. |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 13:36
| ano niečo v tomto zmysle. Ďakujem. Už to skúšam, troška zložité ale ide to. Len škoda že to asi nejde podľa mojich predstáv priamo z Excelu. |
Odeslal: PepaR
Datum odeslání: 24.srp.2007 v 13:48
|
Pokud budete mít zájem, tak mohu zaslat ukázku starého školního projektu, kde byl správce stylů použit.... ------------- PepaR https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz |
Odeslal: Sedláček
Datum odeslání: 24.srp.2007 v 14:05
|
Pokud potřebujete pouze dostat data z exelovské tabulky do Autocadu (již ne zpět) můžete použít DDE.
Toto je ukázka VBA pro EXEL, který mapíše text uvedený v buňce A3 na souřadnice x v buňce A1 a y v buňce A2.
Je to psáno pro A2002LT. V jiné verzi bude nutno změnit "AutoCad LT.DDE"
Sub LT_draw_line_()
Dim x As String Dim y As String Dim text As String Dim prikaz As String Dim channelNumber As Long Dim enter As String x = Range("A1").Value y = Range("A2").Value text = Range("A3").Value prikaz = "[_text " + x + "," + y + " " + text + " ]" channelNumber = Application.DDEInitiate("AutoCad LT.DDE", "system") Application.DDEExecute channelNumber, prikaz Application.DDETerminate (channelNumber) AppActivate "AutoCAD LT" SendKeys "{ENTER 2}", True End Sub |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 14:33
| Chcel by som aby sa zmena prevedená v Exceli preniesla aj do AutoCAD-u (ale to už asi chcem moc?) |
Odeslal: be_em
Datum odeslání: 24.srp.2007 v 14:55
Takže skúšam tip 5367, tzn. chcem dostať údaje z Vlastností výkresu (Drawing properties) do výkresovej tabuľky v Layoute (razítko) pomocou blokov s atribútmi. Bloky mám vytvorené, všetko funguje, lenže údaje tam dostať nemôžem a podľa Tipu 5367 mi tam zjavne chýba jedna dôležitá ikonka (asi to bude v novšom AutoCAD-e???). Prikladám obrázok, vľavo je obrázok z Tip-u a v pravo je môj AutoCAD (2004). Je to skryté niekde inde alebo to táto verzia nepozná???
|
Odeslal: PepaR
Datum odeslání: 24.srp.2007 v 16:25
|
Zkuste si spustit řádkový editor textu, klepněte pravým talčítkme myši a pokud tám máte položku Vložit pole, tak by Vaše verze měla podporovat pole, pokud ne, tak bohužel je podporuje až od verze 2005. ------------- PepaR https://www.jremes.cz" rel="nofollow - jremes.cz | https://www.stavlab.cz" rel="nofollow - stavlab.cz |
Odeslal: zisoun
Datum odeslání: 24.srp.2007 v 16:50
|
Textová pole jsou až od verze 2005, ale pokud máte LT tak tam tu ikonu mít stejně nebudete i v novější verzi. V LT sice fungují textová pole, ale nejsou tam předdefinována. Je potřeba si je vytvořit sám a vložit do textu nebo atributu. Pokud chcete aby se vám zobrazovaly informace z karty Vlastnosti výkresu... je potřeba zadat tyto pole do tabulky : Vlastnosti výkresu (Soubor - Vlastnosti výkresu) Obecné : · %<\AcDiesel $(getvar,Dwgname)>% zobrazí název souboru s příponou · %<\AcDiesel $(getvar,Dwgprefix)$(getvar,Dwgname)>% zobrazí Umístění a název souboru s příponou · %<\AcDiesel $(substr,$(getvar,Dwgname),1[,$(-,$(strlen,$(getvar,Dwgname)),4 )])>% zobrazí název souboru bez přípony · %<\AcVar Filename \f "%fn1">% fn1 zobrazí Umístění a název adresáře fn2 zobrazí název souboru bez přípony fn3 zobrazí Umístění a název souboru bez přípony fn4 zobrazí příponu souboru fn5 zobrazí Umístění a název adresáře s příponou fn6 zobrazí název souboru s příponou fn7 zobrazí Umístění
a název souboru s příponou · %<\AcVar Filesize>% b zobrazí Velikost souboru v bytech · %<\AcVar Filesize \f "%.2f%by2 kB" >% zobrazí Velikost souboru v kB na 2 desetinná místa · %<\AcVar CreateDate \f "%c">% zobrazí datum+čas prvního uložení souboru - formát dle Windows · %<\AcVar SaveDate \f "%c">% zobrazí datum+čas posledního uložení souboru -formát dle Windows Souhrnné informace : · %<\AcVar Xxxx \f "%tc1">% tc1
zobrazí XXXX - velkými písmeny (uppercase) tc2 zobrazí xxxx - malými písmeny (lowercase) tc3
zobrazí Xxxx - prvním velkým písmenem, zbytek malými (first capital) tc4 zobrazí Xxxx Xxxx - první písmeno každého slova velké, zbytek malými (title case) · %<\AcVar Title>% zobrazí Název · %<\AcVar Subject>% zobrazí
Předmět · %<\AcVar Author>% zobrazí
Autora · %<\AcVar Keywords>% zobrazí
Klíčová slova · %<\AcVar Comments>% zobrazí
Komentář · %<\AcVar HyperlinkBase>% zobrazí
Základní hypertextový odkaz Statistika : · %<\AcDiesel $(upper,$(edtime, $(getvar, tdcreate),M/YYYY))>% zobrazí
datum vytvoření výkresu s možností vlastního formátu psaný velkými písmeny · %<\AcDiesel $(edtime, $(getvar, tdcreate),DDDD", "D.MONTH YYYY", "H:MM:SS)>% zobrazí
datum+čas vytvoření výkresu s možností vlastního formátu psaný malými
písmeny · %<\AcVar LastSavedBy>% zobrazí
položku Naposledy uložil · %<\AcDiesel $(getvar,Tdindwg)>% zobrazí
položku Celková doba úprav ve dnech · %<\AcDiesel $(edtime,$(getvar,Tdindwg),$(+,$(*,24,$(fix,$(getvar,Tdindwg))),$(edtime,$(getvar,Tdindwg),HH)):MM:SS)>% zobrazí
položku Celková doba úprav ve zvoleném formátu HH:MM:SS Vlastní : · %<\AcVar CustomDP.INVESTOR>% zobrazí
hodnotu vlastního definovaného názvu uživatelské vlastnosti (např. INVESTOR) ------------- Zisounek |
Odeslal: Vladimír Michl
Datum odeslání: 25.srp.2007 v 13:26
|
Onen tip 5367 je určen pro normální AutoCAD, nikoliv pro omezenou verzi LT. ------------- Vladimír Michl (moderátor) ARKANCE CZ - https://arkance.world - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
Odeslal: zisoun
Datum odeslání: 25.srp.2007 v 18:40
|
Sice je určen pro normální AutoCAD,ale v LT to všechno taky funguje, proto toho využívám, jen je potřeba si zadat všechny definice polí samostatně.
------------- Zisounek |