ARKANCE - globální Platinum partner Autodesk ARKANCE | KONTAKT - CZ | SK | EN | DE
Přes 122.900 registrovaných u nás, celkem 1.126.000 registrovaných (CZ+EN). Tipy pro AutoCAD 2027, pro Inventor 2027 a pro Revit 2027. Nový Kalkulátor nosníků, Spirograf generátor a Regresní křivky v sekci Převodníky. Kompletní příkazy a proměnné AutoCADu 2027.
Konference CADfórum 2026 - automatizace navrhování
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

?
CAD diskuze, rady, výměna zkušeností

CAD Fórum - Homepage 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, 3ds Max, Vault a s dalšími CAD/BIM/PDM 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ě.
Fórum nenahrazuje technický support firmy ARKANCE (CAD Studio) - přímá podpora pro zákazníky funguje na emea.support.arkance.world
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenoVBA DDE

 Odpovědět Odpovědět archiv
Autor
Sedláček Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 15.dub.2005
Lokalita: Czech Republic
Používám:
AutoCad 2024 LT
Stav: Offline
Bodů: 384
Přímý odkaz na tuto zprávu Téma: VBA DDE
    Zasláno: 15.dub.2005 v 08:38

Pokoušín se načíst atributy do exelovské tabulky pomocí VBA a DDE.

Application.DDEExecute channelNumber, "[_-attext  c sablona.txt " + "soubor.txt ]"

mi funguje. Ale chtel bych vybrat pouze některé atributy, a tady začíná problém. Neumím pozastavit provádění kódu do ukončení výběru (ať již přímo v příkatu _-attext, nebo _select). Existuje v tomto případě něco jako "pause v příkazu "command" v LISPu, nebo "\" v menu?

Ve VBA jsem úplný začátečník, tak prosím "polopaticky".

Děkuji

Pavel Sedláček

Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 22188
Přímý odkaz na tuto zprávu Zasláno: 15.dub.2005 v 09:30
Nikoliv, nic takového přes DDE neuděláte.
Proč nepoužít přímo příkazu AutoCADu pro export atributů do excelovské tabulky?
Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz emea.support.arkance.world)
Zpět nahoru
Milan Zobrazit panel
Diskutér
Diskutér

Přihlášen: 27.říj.2004
Lokalita: Slovensko
Stav: Offline
Bodů: 56
Přímý odkaz na tuto zprávu Zasláno: 15.dub.2005 v 10:20

Ja by som na toto nepouzival DDE, ale by som zvolil postup vo VBA:

1. Vyselektujem vsetky bloky, ktore ma zaujimaju (vytvorite SelectionSet a pouzijete nejaku metodu na jeho naplnenie)

2.Ziskam atributy z kazdeho bloku v cykle (For each entity...) pomocou getattribute

3.zapisem do Excelu iba tie atributy co potrebujem, t.j. otvorim Excel (Dim MojExcel As Excel.Application,Set MojExce1 = New Excel.Application) a zapisem tam hodnoty(MojExcel.Worksheets(1).Cells (2, 4) = AtributKtoryChcem)

Sorry

Milan

Zpět nahoru
Sedláček Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 15.dub.2005
Lokalita: Czech Republic
Používám:
AutoCad 2024 LT
Stav: Offline
Bodů: 384
Přímý odkaz na tuto zprávu Zasláno: 15.dub.2005 v 11:13

Omlouvám se, ale zapoměl jsem uvést, že se jedná o A2002LT, takže obě rady jsou pro mne nepoužitelné. Přesto díky.

Pavel Sedláček

PS

Jaký je příkaz pro export atributů do exelovské tabulky a od jaké verze AutoCadu funguje?

Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 22188
Přímý odkaz na tuto zprávu Zasláno: 15.dub.2005 v 13:41

Export atributů do Excelu je tuším od AutoCADu verze 2002, ale nikoliv u verzí LT. Ty jsou omezené nejen co do programování, ale i co do různých "správcovských" funkcí.
Můžete ale použít např. Excellink LT

Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz emea.support.arkance.world)
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 2312:Jak otevírat DWG výkresy poklepáním v jediném okně AutoCADu?
Tip 13108:Poklepání na soubor nebo otvírání z Vaultu spouští novou instanci Inventoru.
Tip 9321:VIPNefunguje mi VBA v Inventoru 2016, 2015, 2014 nebo 2013 - příčiny.
Tip 6790:VIPPřidání ikony vlastního příkazu/makra v Inventoru.
Tip 6490:VIPVBA aplikace v 64bitové verzi AutoCADu (kompatibilita, migrace)
Tip 5893:LISP, VBA a ARX aplikace v AutoCADu LT.


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 0,258 sekund.