Pajk
15.06.2005, 20:15
Dobry den,
mam vetsi mnozstvi (radove stovky) vykresu ve kterych je zalozen prazdny VBA projekt (vzniklo patrne povolenim volby AutoEmbeding v nastaveni maker). Potreboval bych tyto projekty z vykresu hromadne odstranit, nejlepe jinym VBA kodem (soucast rozsahlejsiho VBA projektu). Dokazu pristoupit na jednotlive projekty a vypsat treba jejich nazev (viz nize), ale neumim je odstranit. Pripominam jen, ze projekty k odstraneni jsou ulozeny nikoli v externich DVB souborech ale primo v DWG.
Dim oProj As ObjectFor Each oProj In ThisDrawing.Application.VBE.VBProjects MsgBox oProj.NameNext oProj
Dekuji
mam vetsi mnozstvi (radove stovky) vykresu ve kterych je zalozen prazdny VBA projekt (vzniklo patrne povolenim volby AutoEmbeding v nastaveni maker). Potreboval bych tyto projekty z vykresu hromadne odstranit, nejlepe jinym VBA kodem (soucast rozsahlejsiho VBA projektu). Dokazu pristoupit na jednotlive projekty a vypsat treba jejich nazev (viz nize), ale neumim je odstranit. Pripominam jen, ze projekty k odstraneni jsou ulozeny nikoli v externich DVB souborech ale primo v DWG.
Dim oProj As ObjectFor Each oProj In ThisDrawing.Application.VBE.VBProjects MsgBox oProj.NameNext oProj
Dekuji