Zdravím všechny,
udělal jsem si jednoduchý prográmek na vynášení bloků s atributy. Jako zdoj dat slouží TXT soubor. V Map 3D 2006 jsem to odladil a vše funguje. Chtěl jsem tento prográmek poskytnout kolegovi AutoCad 2002 Map 5 a jemu se to vyhazuje chybu na řádku :
Set Block = ThisDrawing.ModelSpace.InsertBlock(insertPoint, nameInsertBlock, 1, 1, 1, 0)
uvádím i definici proměných:
Dim nameInsertBlock As String, insertPoint(0 To 2) As Double, Block As AcadBlockReference
číslo chyby je -21748113 : Method 'InsertBlock' of object 'IAcadModelSpace' failed.
Nevíto někdo čím to je? Myslel jsem, že jednoduché prográmky ve VBA jsou komaktibilní napříč verzemi. Děkuji předem z a jakoukoliv odpověď.

mate osetrenu existenci definice bloku ve vykresu, kde se ma makro spustit?
toto byva muj obvykly problem v makrech tohoto typu
pripadne at Vas kolega nejdrive rucne nakopiruje blok do vykresu

S pozdravem Zakoutsky

Děkuji p. Zakoutskemu,
vase rada sice nevedla primo k cili, ale aspon jsem si uvedomil ze onen vkladany blok jsem vkladal byl vytvoren v me verzi Cadu tedy nekompaktibilni s kolegovou. A to byla pricina. :-( .  Jeste jednou dekuji.