Hi, I inserted too many pictures (shapes) in one cell in excel. Say 100 images in same topleftcell. Now everytime I click (select) the topmost image of it, and then select any cell, the window blinks (the images ) Maybe to quickly show that there are multiple on it,. I find it annoying, how to avoid the blinking? Please help.
Love it! I'm trying to dynamically change the line weight of an object based on a cell's value, similar to what you've done here, except for line weight instead of object size. Do you have any suggestions?
Hmmm - this is one of those annoying situations where you have to select the line before you can resize it: ActiveSheet.Shapes.Range("Straight Connector 1").Select Selection.ShapeRange.Line.Weight = 6
Thanks, but what about a CIRCLE? Nobody seems to know this: if I insert a circle that's 24x24" (perfect circle), HOW do I determine how to fit 8,964 cells within that area? It there an auto script to do this? Please help me with details if you can. Thanks
Hi Bill, I’m having difficulties keeping this consistent or reproducing the results. Is there a few things we need to follow and not deviate from? Another problem is creating this on some sheets but having to hit the run button to have it work. Would you please help.
Could you give instruction to move shape by function, if not could you help to instruction to move by macro? Ex: I have the excel file with the date of month and I have function today() in 1 cell (different to date in table of month) to show the date of today (4/5), and I want to assign shape to this function to order shape: if date (result of today()) = tomorrow, shape will run to the next day (4/6) without drag shape by hand. Thanks.
Thank you for the quick explanation. But, At 3 min, you make a very quick comment, that I can't understand. It apparently explains why typing in any cell will cause the X and Y values in cells A1 and A2 to change. You do not show how you made those cells behave that way, or why you did that. I doubt anyone will want typing a value in a random cell to change a shape.
Not sure what I am doing wrong. When I open VBA and select the code and run button, it works, but when I am in the sheet itself and change numbers the shape stays same. I have checked the code is in the sheet not module. I changed shape name to TestShape. Using Office 365 This is my code: Private Sub Worksheet_Calculate() With ActiveSheet.Shapes.Range(Array("TestShape")) .Width = Range("A1").Value .Height = Range("A2").Value End With End Sub
This is a long shot, but lets try it. 1) Go to VBA Editor 2) Press Ctrl+G to open the Immediate pane 3) In that pane type the following line and press Enter: Application.EnableEvents = True If this property was somehow set to False, then the event handler won't run.
@@BillJelen Hi there. Tried but not working. Here is my code on the actual sheet: Private Sub Worksheet_Calculate() With ActiveSheet.Shapes.Range(Array("TestShape")) .Width = Range("A1").Value .Height = Range("A2").Value End With End Sub ------------------------------------------------------------------------------------------------------------------------------------------------ Private Sub Worksheet_SelectionChange(ByVal Target As Range) End Sub
It seems really odd, but a circle is treated the same as a square or rectangle. Select a circle in your worksheet. You will see that the selection border is a square. The width of the bounding box matches the diameter of the circle. The code in the video should work for a circle as well.
Man this video was dense in content, to the point and extremely clear, I'm completely new to Excel and this helped a ton!
That was an interesting video Bill. And thanks for the fast excel discount.
Hello Bill,
Man I try do to this thousand times and dont work. You can help??
Thanks Bill, love when you do VBA.
Hi, I inserted too many pictures (shapes) in one cell in excel. Say 100 images in same topleftcell. Now everytime I click (select) the topmost image of it, and then select any cell, the window blinks (the images ) Maybe to quickly show that there are multiple on it,. I find it annoying, how to avoid the blinking? Please help.
Love it! I'm trying to dynamically change the line weight of an object based on a cell's value, similar to what you've done here, except for line weight instead of object size. Do you have any suggestions?
Hmmm - this is one of those annoying situations where you have to select the line before you can resize it:
ActiveSheet.Shapes.Range("Straight Connector 1").Select
Selection.ShapeRange.Line.Weight = 6
How would I make the cell value input as inches for the shape dimensions?
Thanks, but what about a CIRCLE? Nobody seems to know this: if I insert a circle that's 24x24" (perfect circle), HOW do I determine how to fit 8,964 cells within that area? It there an auto script to do this? Please help me with details if you can. Thanks
Hi Bill,
I’m having difficulties keeping this consistent or reproducing the results. Is there a few things we need to follow and not deviate from? Another problem is creating this on some sheets but having to hit the run button to have it work. Would you please help.
Could you give instruction to move shape by function, if not could you help to instruction to move by macro?
Ex: I have the excel file with the date of month and I have function today() in 1 cell (different to date in table of month) to show the date of today (4/5), and I want to assign shape to this function to order shape: if date (result of today()) = tomorrow, shape will run to the next day (4/6) without drag shape by hand. Thanks.
when i enter a number from a1 and a2 then click the shape it keeps on shrinking , hoping for help
I tried it but isnt working
What is the possible problem
Thank you
Hi, how can I resize a chart width with offset counta functions? I guess is inside vba too. Please help me
Post a question here: www.mrexcel.com/board/forums/excel-questions.10/ and someone will know the VBA for this.
Thank you for the quick explanation. But, At 3 min, you make a very quick comment, that I can't understand. It apparently explains why typing in any cell will cause the X and Y values in cells A1 and A2 to change. You do not show how you made those cells behave that way, or why you did that. I doubt anyone will want typing a value in a random cell to change a shape.
The cells A1 and A2 have the "random between" formula, so that they change whenever any cell on the sheet changes.
Not sure what I am doing wrong. When I open VBA and select the code and run button, it works, but when I am in the sheet itself and change numbers the shape stays same. I have checked the code is in the sheet not module. I changed shape name to TestShape.
Using Office 365
This is my code:
Private Sub Worksheet_Calculate()
With ActiveSheet.Shapes.Range(Array("TestShape"))
.Width = Range("A1").Value
.Height = Range("A2").Value
End With
End Sub
This is a long shot, but lets try it.
1) Go to VBA Editor
2) Press Ctrl+G to open the Immediate pane
3) In that pane type the following line and press Enter:
Application.EnableEvents = True
If this property was somehow set to False, then the event handler won't run.
@@BillJelen Hi there. Tried but not working.
Here is my code on the actual sheet:
Private Sub Worksheet_Calculate()
With ActiveSheet.Shapes.Range(Array("TestShape"))
.Width = Range("A1").Value
.Height = Range("A2").Value
End With
End Sub
------------------------------------------------------------------------------------------------------------------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
End Sub
Can we do the same with circles?? Can we change the diameter of circle based on value ???
It seems really odd, but a circle is treated the same as a square or rectangle.
Select a circle in your worksheet. You will see that the selection border is a square. The width of the bounding box matches the diameter of the circle. The code in the video should work for a circle as well.
@@MrXL thanks so much for taking time and replying. Very much appreciated! 🙏🙏🙏