Microsoft Word/Run-time error '4693'


Joseph Davoli wrote at 2015-01-28 16:49:17
"On Error Resume Next" is not often a good idea.  A more rigorous approach is:

With oIshp

  'Check to see if this InlineShape is NOT a horizontal line (Type = 6).

  If .Type <> 6 Then

     .ScaleHeight = PercentSize

     .ScaleWidth = PercentSize

  End If  'End checking to see if this InlineShape is NOT a horizontal line.

End With

About Microsoft Word
This topic answers questions related to Microsoft Word stand-alone or Microsoft Office Word including Word 2003, Word 2007, Office 2000, and Office XP. You can get Word help on formatting text, tables, tabs, fonts, styles, general Word layouts, bullets, headings, and outlines, using templates, toolbar modifications, and using Track Changes. You may also find tips on linking Word and Excel embedded objects including charts. This site does not provide a general Word tutorial nor the basics of using a word processor. It provides specific answers to using Microsoft Word only. If you do not see your Word question answered in this area then please ask a Word question here

Microsoft Word

All Answers

Answers by Expert:

Ask Experts


Aidan Heritage


I have provided first hand support since `95 for Microsoft Office majoring in Word and Excel - support for all versions of Word from 2 onwards

©2017 All rights reserved.