View Single Post
 
Old 11-15-2025, 01:49 PM
MartinGM MartinGM is offline Windows 11 Office 2021
Competent Performer
 
Join Date: May 2023
Location: England
Posts: 118
MartinGM is on a distinguished road
Default Oddity when inserting a picture from file

I have a macro which inserts a picture from a specific file location - it then goes on to do other stuff, but that's not relevant to the minor issue i have.

The macro works fine but a change has taken place which I would like to reverse but I can't see how to do it. It may have something to do with Word set-up I guess as I definitely have not changed the macro.

Its an ordinary piece of code which just opens the insert from file dialog and points to a specfic file location . . .

Code:
With Application.FileDialog(msoFileDialogOpen)                  'Open the Thumbails folder

.InitialFileName = ThumbnailsFolder                             'Set where the dialog opens
.Title = "Choose a file to insert"                              'Title for the dialog box
.AllowMultiSelect = False
If .Show <> -1 Then Exit Sub
FileName = objFSO.GetFileName(.SelectedItems(1))                'Capture the filename
FullPath = ThumbnailsFolder & FileName                          'Set the full path of the picture, for later insertion

End With
The last two lines are for later use.

Up until yesterday, this opened the usual fairly small dialog box for file insertion which, incidentally, cannot be resized.

As of this morning it opens the same dialog but it is full screen - and cannot be resized.

I have no idea why - I thought it was not possible for the dialog to be full screen - and I would like to revert to the smaller dialog. That's because the smaller size allows me to see other stuff on my screen which helps me make the correct file selection.

Incidentally, if I try and insert a picture using the ribbon menu buttons, the usual smaller dialog box opens.

I have tried restoring a much older version of the word file to which this applies but that has made no difference.

Any ideas gratefully received.

PS I wonder if the change could be connected with yesterday's Windows 11 and Office 365 update ?
Reply With Quote