Mettre en forme les bordures de toutes les zones de texte d'un doc Word

Bonsoir à tous,

J'utilise une macro Excel pour générer un document Word, utilisant des ressources présentent dans l'Excel source. Dans ce document Word, j'ai besoin de supprimer l'ensemble des bordures des zones de texte générées en amont dans ma macro. Je n'arrive pas à saisir comment utiliser la fonction Borders avec mon objet, même en lisant la documentation Microsoft. Ci-joint le code que j'essaie de faire tourner:

Dim oShp As Word.Shape
Dim z As Long
For z = ActiveDocument.Shapes.Count To 1 Step -1
Set oShp = ActiveDocument.Shapes(z)
If oShp.Type = msoTextBox Then
Selection.oShp.Borders.Enable = False
End If
Next z

Actuellement, Excel me renvoie une erreur sur le fait que la fonction Borders ne soit pas gérée par l'objet.

Quelqu'un a une idée?

Par avance, merci beaucoup

Bonjour Alex16 et

Une petite présentation ICI serait la bienvenue

Si vous ne l'avez pas encore fait, je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER]
qui vous aidera dans vos demandes et réponses sur ce forum

Ainsi que sur les fonctionnalités (Nouveau Forum au bas de page notamment)

Le sujet concerne Word, il a donc été déplacé au bon endroit, merci d'y faire attention.

Merci de votre participation

Cordialement

Bonjour, l'enregistreur macro de word ne renvoi "Border" pour supprimer le cadre d'une shape

Selection.ShapeRange.Line.Visible = msoFalse