Makro z aparatem fotograficznym

[abond57]

Witam.
Po zarejestrowaniu makra z użyciem aparatu fotograficznego.
W kodzie myśli się zapis np.:
ActiveSheet.Shapes.AddShape (, 256,8, 73,2, 190,8, 190,8)
bez podanego Typu i zatrzymuje się w tym miejscu przy ponownym uruchomieniu.
Czy można to jakoś "ugryźć" ?

 

[Greg Truby]

[I hope google translates this well enough for it to be helpful. Mam nadzieję, że Google przetłumaczy to wystarczająco dobrze, aby było pomocne. ]

Rejestrator makr powinien rejestrować stałą odpowiadającą dodawanemu kształtowi.

Sub AddOvalAndTriangle()
    With ActiveSheet.Shapes
        .AddShape msoShapeOval, 150, 20, 180, 90
        .AddShape msoShapeIsoscelesTriangle, 150, 150, 100, 100
    End With
End Sub

Listę różnych stałych kształtu można znaleźć za pomocą eksploratora obiektów w VBE lub pod tym linkiem:

MsoAutoShapeType enumeration (Office)

Office VBA reference topic

docs.microsoft.com