?
Solved

Excel Macro to auto position images

Posted on 2014-03-12
2
Medium Priority
?
296 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 52

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

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

When asking a question in a forum or creating documentation, screenshots are vital tools that can convey a lot more information and save you and your reader a lot of time
Gain an elementary understanding of Blockchain technology.
An overview on how to enroll an hourly employee into the employee database and how to give them access into the clock in terminal.
Simple Linear Regression
Suggested Courses

801 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