oovbaapi: use autoshape in case of EllipseShape

Required for msoShapeOval autoshape type

Change-Id: I62ef053e8f387f4d87b28b7d17b82209d28fe0fd
Reviewed-on: https://gerrit.libreoffice.org/39209Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Tamás Bunth <btomi96@gmail.com>

vbahelper/source/vbahelper/vbashape.cxx

@@ -144,7 +144,9 @@ ScVbaShape::getType( const css::uno::Reference< drawing::XShape >& xShape )
     }
     else if( sShapeType == "com.sun.star.drawing.LineShape" )
         return office::MsoShapeType::msoLine;
-    else if( sShapeType == "com.sun.star.drawing.CustomShape" || sShapeType == "com.sun.star.drawing.RectangleShape" )
+    else if( sShapeType == "com.sun.star.drawing.CustomShape"
+            || sShapeType == "com.sun.star.drawing.RectangleShape"
+            || sShapeType == "com.sun.star.drawing.EllipseShape" )
         return office::MsoShapeType::msoAutoShape;
     else if( sShapeType == "com.sun.star.drawing.TextShape" )
         return office::MsoShapeType::msoTextBox;