Code to resize image

  • Thread starter Thread starter Gotroots
  • Start date Start date
G

Gotroots

I want to use a command button to resize an image in a worksheet. I tried to
generate the code by recording a macro. However I have just leaned this is
not possible using Office 2007.

Most great full if someone could assist with supplying the code for this.
 
Dim myWS as excel.worksheet
Dim myShape as Excel.Shape

Set myWS = ActiveSheet
Set myShape = myWS.Shapes("EnterShapeName")

With myShape
.LockAspectRatio = msoFalse
.width = 500
.height = 300
end with
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Image resizing 1
Resize a Table using VBA 9
Resize a row but copy but skip columns I don't want to copy 6
Delay when userform resizes?? 3
Code character limit with Resize or Transpose or cell? 8
Resize image using macro 1
How do you resize a Multi Page User Form? 16
resizing images in code 1

Back
Top