otabekgh

Option Explicit

'=== Resize every picture to a % of its ORIGINAL size, then centre it.  ===
'=== Always measured from the original, so repeated runs never compound. ===
'=== Display size only - the embedded image data is untouched.          ===
'=== Enter 100 to reset all pictures back to original size.             ===
'=== Default = your most-used value (ties broken by most recent).       ===
'=== Type CLEAR to forget the history.                                  ===

Public Sub ResizeAllImages()