?
Solved

Excel Macro to auto position images

Posted on 2014-03-12
2
Medium Priority
?
303 Views
Last Modified: 2014-03-12
The requirement is a macro to put the focus on an inserted image on a worksheet, run a macro to have it position to always have the top left of the image positioned at the top left of the printed worksheet.

I asked why pushing it to the top left of the worksheet doesn't work for them and the answer I got was that it wasn't precise.

Thank you,
0
Comment
Question by:urthrilled
2 Comments
 
LVL 54

Accepted Solution

by:
Rgonzo1971 earned 2000 total points
ID: 39924230
Hi,

the macro place the selected picture at the topleft of the worksheet

Sub Macro()

Set s = Selection
If TypeName(s) = "Picture" Then
    s.Top = 0
    s.Left = 0
    s.TopLeftCell = "A1"
End If
End Sub

Open in new window

Regards
0
 
LVL 4

Author Comment

by:urthrilled
ID: 39924315
Thank you, I set it up and it worked to the requirements I was given, still not sure why pushing it to the top left didn't work for him, but I think this is what he asked for.
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this post we will learn how to make Android Gesture Tutorial and give different functionality whenever a user Touch or Scroll android screen.
The SignAloud Glove is capable of translating American Sign Language signs into text and audio.
The viewer will learn how to use a discrete random variable to simulate the return on an investment over a period of years, create a Monte Carlo simulation using the discrete random variable, and create a graph to represent the possible returns over…
An overview on how to enroll an hourly employee into the employee database and how to give them access into the clock in terminal.

864 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question