Zobrazit plnou verzi příspěvku: VBA DDE

Sedláček
15.04.2005, 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

Vladimír Michl
15.04.2005, 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?

Milan
15.04.2005, 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

Sedláček
15.04.2005, 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?

Vladimír Michl
15.04.2005, 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