Hello, I wondered if it was possible to fix a position on a Shape, Button and Text Box and the would stay there even if I scrolled threw cells. If so how and could I have an example or explanation so I can Google it. Thanks!
I wanted to position them at the top corner starting by A1
RoundedRectangle6
TextBox4
Rectangle1
Rectangle2
Picture7
I have an image that I named "LXXL" - here's how I moved it to "B17":
Sub PlaceShape(): Dim T As Single, L As Single, W As Single, H As Single, C As Range Set C = Range("B17"): L = C.Left: T = C.Top: W = C.Width: H = C.Height ActiveSheet.Shapes("LXXL").Top = T: ActiveSheet.Shapes("LXXL").Left = L End Sub
If I've helped you, please consider adding to my reputation - just click on the liitle star at the left.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~(Pride has no aftertaste.)
You can't do one thing. XLAdept
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~aka Orrin
Thanks XLAdept for the example but I want to be able to scroll and it stay in the position on top ad never move. Any thoughts?
It doesn't move when I scroll??????? Do you mean you want it modeless?????
Have you tried - Freeze Panes?
Last edited by xladept; 12-07-2012 at 10:45 PM.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks