Le portail francophone de la géomatique

bjr,


je mets un objet de type MapInfo.Map dans un document word

apparemment cela semble etre un OLE de type incorporé plutot que lié


avec vba , jessaye de balayer les objets shapes afin de voir si il repere les OLE Mapinfo :

mais cela ne semble pas marcher


sub chercher()


dim sh as shape


for each sh in activedocument.shapes

     if sh.type = msoEmbeddedOLEObject then
   
         msgbox sh.OLEFormat.ProgID


     end if


next






end sub