WD97: Macro to Disable Float Over Text Property

• Microsoft Word 97 for Windows

SUMMARY

This article provides a sample Visual Basic macro that opens the InsertPicture dialog box with the Float Over Text check box deselected. If you name the macro InsertPicture Word runs your macro instead of opening the default Insert Picture dialog box. (To locate this dialog box, point to Picture on the Insert menu, and then click From File.)

MORE INFORMATION

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

The following macro example uses the name, InsertPicture. You can use another name and assign the macro to a toolbar button or menu if you want to have access both to Word's built-in dialog box and the one displayed when this macro is run.

   Sub InsertPicture()
      set mydialog = Dialogs(wdDialogInsertPicture)
      mydialog.floatovertext = False
      mydialog.Show
   End Sub