méthode select() sur imageRésolu

Question

Bonjour tout le monde,

Je suis entrain de bosser sur une macro word en VB (développer par une autre personne dans mon entreprise il y a quelques temps) et j'ai quelques soucis par rapport a une sélection d'image et l'utilisation de la variable sélection dans la foulée.

Voici le bout du code qui génère l'erreur :
If DessinFound Then ' Variable booléenne = a true si le dessin est trouvé
    For Each ImageDessin In DocModele.Shapes        If VBA.Left (ImageDessin.Name, 4) "DSI_" And VBA.Mid (ImageDessin.Name, 5) VBA.Mid (Dessin.Name, 5) Then
            Set ItemModele.ImageDessin = New clsImageDescr
            DocModele.UndoClear
            ImageDessin.Select
                'ici je n'ai pas d'erreur
            Selection.Copy
                'la je n'y passe pas...
            Exit For
        End If
    Next
End If
Le message d'erreur que j'obtiens est : 
"Cette méthode ou propriété n'est pas disponible car aucun texte n'a été sélectionné"
Merci d'avance de votre aide !

Azr@ël

angelspawner · Accepted Answer

Bon et bien après avoir passé plusieurs jours sur ce probleme, j'ai put éxécuter le même code sur une autre machine et cela a fonctionné!
Mon erreur était due à une installation bancale d'office.

Azr@ël

Méthode select() sur image

1 réponse

Votre réponse

Discussions similaires