I insert a picture (Insert -> Picture -> From File...). However, OO changes its displayed size so that it doesn't show at its original size.
I need to change the picture's size to its original size (Format -> Picture... -> Type -> Original Size).
I have to do this with hundreds of pictures, so it would be hugely helpful to create a macro to do this and assign it to a keyboard shortcut.
I know how to create macros and assign them to the keyboard, but I don't know what command to use to assign the correct size. I've got this far...
Code: Select all
sub SetToOriginalSize
dim oPic as Object
oPic = ThisComponent.CurrentSelection
oPic.Height = ???
oPic.Width = ???
end sub
Thanks