Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 08-18-2020, 05:59 AM
Snazzy Snazzy is offline Some Autoshapes not inserting via VBA in Word 2003 Windows 10 Some Autoshapes not inserting via VBA in Word 2003 Office 2019
Novice
Some Autoshapes not inserting via VBA in Word 2003
 
Join Date: Jun 2020
Posts: 7
Snazzy is on a distinguished road
Question Some Autoshapes not inserting via VBA in Word 2003

Hello

Looking for help with two issues

1. I've been trying to extend the default 2003 Autoshape menu with shapes not included by default, e.g. a 12-pointed start (the default menu only has buttons for the 4, 5, 8, 16, 24 and 32-poited stars)
Simply changing the code from the recorded '16'-pS to the '12'-pS gives an "2147417848 (80010108): This specified value is out of range" error.
Code:
ActiveDocument.Shapes.AddShape(msoShape12pointStar, 60, 20, 72#, 72#).Select
As the recorded code for the 16-pS works just fine, I'm wondering if this autoshape is available at all in the 2003 version - or if anything else is need?
The same holds true for other Autoshapes that have no icon button in the 2003 default menu (frame, halfframe, decagon, tear ...)

I have worked the default cliparts to insert like an Autoshapes (simple black lines, white body, no 3d, etc.), but the default cliparts don't inlcude all the missing shapes, and same Cliparts like the frame don't even have proper names just "AutoShape" with an ever varying number. For this "AutoShape " & i, a For loop set to a high number, and On Error Resume Next work-around the changing number problem, but the many number inclusions in the loop could pose a problem for other autoshapes as well. So its not an optimal solution



2. Also, is it possible via VBA or otherwise to create a custom button (incl. custom button face) with dropdown menu like those of the autoshape menus where textless buttons arrange in a net grid?

Any help is much appreciated.
Sincerely,
Snazzy
Reply With Quote
  #2  
Old 08-18-2020, 12:16 PM
Charles Kenyon Charles Kenyon is offline Some Autoshapes not inserting via VBA in Word 2003 Windows 10 Some Autoshapes not inserting via VBA in Word 2003 Office 2019
Moderator
 
Join Date: Mar 2012
Location: Sun Prairie, Wisconsin
Posts: 9,125
Charles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant futureCharles Kenyon has a brilliant future
Default

Consider saving your custom shapes as AutoText and using an AutoTextList field.
Reply With Quote
Reply



Similar Threads
Thread Thread Starter Forum Replies Last Post
Some Autoshapes not inserting via VBA in Word 2003 Custom Autoshapes excelledsoftware PowerPoint 9 06-04-2012 01:27 AM
Autoshapes disappear nsv Word 0 09-29-2010 12:09 AM
Inserting Pictures from File in Office 2003 pctech Office 1 02-20-2009 03:59 PM
Dimension Autoshapes karthikcoep Word 0 01-16-2009 07:42 AM
Unable to insert AutoShapes earthling Word 0 01-01-2006 10:16 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 05:34 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft