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 Object
For Each oProj In ThisDrawing.Application.VBE.VBProjects
  MsgBox oProj.Name
Next oProj

Dekuji

LSP kod makra skutecne odstrani, ale v tom neni problem. Ja mam ve vykresech pouze zalozeny PRAZDNY projekt (makra v nem bud nejsou, a nebo jiz jsou odstranena) s nazvem "ACADProject". A ten neumim odstranit. :-(