shape

I am trying to create a menu with shapes that create itself on every page and fills in sheet names as shape text boxes. I want to loop through an array of sheet names and an array of macro names and assign a macro for each shape textbox. Dim sheetNames As Variant Dim macroNames() As Variant...

Hi! Whenever I dim an attribute to "shape" it makes it captialize weird. Say I type "dim shp as shape" it returns this "Dim shp as sHape" Anyone know why it would capitalize the "H"?

Dear All, I have an excel sheet having some 30+ shapes which is making a map. I have given names to all the shapes as you can see in the below picture. What i like is that i would like to color the different shapes based on their value in a table. Excel File...

Hi everyone For years I've created shapes and put the text in as cell value. I need to copy a shape to a huge number of cells but when i copy paste it keeps the cell reference of the last shape "=F123" for example so is there an easy way to fix this? if not would you help me with a macro to do...

Hi everyone, I would like to have a macro that when I click on any shape in sheet "Data1" it select the cell Behind it, The page is set in such a way that every picture is within a single cell. Please help if you can Thanks Tony

Hello, VBA Nation. I am using Excel for Mac 2016. I would like a Shape to popup and disappear in a few seconds after a macro is finished. It works in Step Into mode, but does not when is attached to a button or ran from VBA Editor.The Shape does not want to appear. I will appreciate any input...

I am stuck. My dilemma is that I have some shapes on a worksheet, which when clicked bring up a user form for each individual shape clicked. I've changed from having 15 individual user forms, to a single user form with a combobox which when a value is selected will save the data to the...

Hi, Is it possible to rename the active sheet shapes with cell values, there will only ever be 15 shapes in column C and 15 cell values to use as a name in Column B cells B2,13,24,35,46,57,68,79,90,101,112,123,134,145,156 - Each cell has a different name and will always be a number. Both...

I have a macro which opens a userform with a listbox. I execute this macro by clicking a shape in a worksheet. The problem is that sometimes when the userform pops up, the listbox catches the same mouse click from clicking the shape, and that selects an item on the list. What is the best way...

Hi, I would like to disable a shape as button to run macro after first click. Is this possible? Thanks

In a nutshell, the code below takes several picture objects from an Excel workbook (they are charts, but the source system puts them into Excel as pics) and pastes them into a PowerPoint presentation. As it stands, the code works. I just need some modifications to make a bit more dynamic. For...

I would like to find a way to draw arrows between cells in such a way that the arrow stays connected to those cells even when one of the cells is moved. I am using Excel 2010. If I simply draw an arrow (Insert > Shapes >Arrow) between two cells, then it remains stuck to that cell if I resize...

Hi, I have a worksheet showing 3 tanks where they have not the same capacity and by help I got a code (below). Current code shows that the 3 tanks have a capacity of 400000. My problem is that only Tank A has that capacity. Capacity of Tank B is 272000 and Tank C is 200000. Will you please...

Hello all!! In Excel, if I add a shape to a sheet and then delete it, the shape object still remains in memory. Is there a way to redraw that shape? Please see the code below for reference. Sub DrawTest() Dim x As Excel.Shape <code style="margin: 0px; padding: 0px; border: 0px; font-style...

I have a macro embedded shape ("Group 12") on my worksheet that I wish to code to disable the macro associated to it. I know I have to use the Shape.OnAction property, but I'm unsure on the code to apply it to the shape. With Activesheet shape.group 12.onaction = "" End With The line in...

Hi I have this code (Below) and I want to cut and paste Shape "C" to Sheet 2. What I need to change in the code so that Shape "C" will work in Sheet 2? Option Explicit Private Sub AdjustTank(ByVal CurLevel As Double, ByVal TankID As String, _ Optional MaxLevel As Double = 400000) Dim Tank...

Hi, I have percentage values in certain cells on a sheet (E3 currently displays 84% for example). I would like a shape which takes the value of E3, and then applies that percentage to a gradient fill level of the shape, starting at the bottom. So if the shape (an Oval), was to take 50%, then...

Hi I am using a code so that the shape changes the color when a cell value is changed. My problem is that cell J24 is changing as a result of a formula recalculating. So what I have to change in my code shown below to make it work? I prefer that the code will work for 2 shapes since I need to...

This is more of an annoyance than anything. I have a form which generates an email and then quits Excel. The macro to run the code is on a shape, linked to the code. If I am out of a cell and anywhere on the worksheet it is fine. But if I am "live" in a cell, ie. editing when the shape is...

On my userform, I have a textbox (uf1vb1_OPS) that has code written to it when clicked by the user executes code which. I wish to mimic as a button. By default, the shape's SPECIALEFFECT property is Raised (1- frmSpecialEffectRaised). When the user clicks the shape, I want the button to appear...