VBA: Imprimer des formes dans sheets2 à partir de sheets1 code - Sélection

Basé sur le bouton cliquez sur des feuilles 1 où le code est écrit, je veux ajouter une forme sur les feuilles 2 et en utilisant la sélection de certaines propriétés de forme comme indiqué dans ce qui suit code.VBA: Imprimer des formes dans sheets2 à partir de sheets1 code - Sélection

With Sheets(2).Shapes.AddShape(msoShapeOval, 800, 700, 60, 60).Select 
Selection.Text = "Shape" 
Selection.Font.Size = 26 
End With

N'est-il pas supposé sélectionner les feuilles 2 et imprimer la forme ainsi changer ses propriétés? Ou quand je fais la sélection essaye-t-elle de trouver la valeur des feuilles 1?

Source

2017-05-02 vbalearner

vous pouvez essayer cette

Sheets(2).Shapes.AddShape(msoShapeOval, 800, 700, 60, 60).Select 
Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Text = "Shape" 
Selection.ShapeRange(1).TextFrame2.TextRange.Characters.Font.Size = 26

Source

2017-05-02 12:01:38 Maddy

Merci Maddy. Bien que j'aie essayé encore et fait, je ne peux pas comprendre pourquoi j'ai besoin du TextFrame.TextRange.Characters.Text puisque je l'ai fait avec seulement Selection.Text – vbalearner

https://msdn.microsoft.com/en-us/library/ office/ff743845.aspx – Maddy

Cependant, si je place Selection.Text = "Shape" fonctionne aussi. – vbalearner

VBA: Imprimer des formes dans sheets2 à partir de sheets1 code - Sélection

Répondre

Questions connexes