Bonjour, je suis débutant en VBA alors j'ai besoin de votre aide! Je dois faire un cercle unité qui propose un angle parmi les angles remarquables à chaque fois que je clique sur un bouton. Je sais comment faire un bouton et la lier à une macro. J'ai aussi été capable de faire un cercle avec la fonction suivante:
Pour le reste, j'ai besoin d'un petit coups de pouce!
Merci et bonne journée!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Draw_Cirlce() ActiveSheet.Shapes.AddShape(msoShapeOval, 12, 6.75, 500, 500).Select Selection.ShapeRange.Fill.Visible = msoFalse With Selection.ShapeRange.Line .Visible = msoTrue .ForeColor.RGB = RGB(255, 0, 0) .Transparency = 0 End With With Selection.ShapeRange.Line .Visible = msoTrue .Weight = 2.25 End With End Sub
Partager