There is an option that automatically creates the Drawing Canvas. You can turn it on vba with
Code:
Application.Options.AutoCreateNewDrawings = True
Using the interface you go to File > Options > Advanced > Editing Options > Automatically create drawing canvas when inserting AutoShapes