shapes

  1. J

    Size shapes based on a value in a range of cells

    Hi all I currently have static sized shapes, however, would like to increase the size depending on a value in a range of cells eg if an issue is high then I'd like the shape to be bigger - this is what I currently have: If Not...
  2. R

    Protect Shapes wile allowing doubleclick+data validation lists in same cell

    I'm stuck. I can't find a way to protect my sheet while allow users to double click in a cell, use data validation list in the same cell while protecting shapes from being edited. When I set DrawingObjects:=True the shapes are protected but I can no longer double click in a cell that has a data...
  3. N

    VBA - Inconsistent PPT Formatting Across Computers

    I have automated the creation of a PPT slide. However, the issue I run into arises when I run it on other computers. The size and positioning of the shapes seems to change ever so slightly, but noticeably. I have the shapes set to position themselves automatically based on original position...
  4. R

    Spreadsheet Won't Print Color

    This is weird. I have a worksheet that is generated by another piece of software (it's web-based, I don't know). On this Excel sheet, I have: Conditional formatting that changes the fill color and the text color Text that, after it's been imported, I manually change the color An imported...
  5. E

    VBA - How to select/change shapes with the same name

    Hi, I developed a macro to change shapes colors based on the value of a cell. Originally I wrote this code ActiveSheet.Shapes.Range(Array("Col")).Select If Range("D69") = "0" Then Selection.ShapeRange.Fill.ForeColor.RGB = RGB(127, 127, 127) ElseIf Range("D69") = "1" Then...
  6. D

    Trouble with Shapes

    Good afternoon, In an attempt to solve another's problem, I am playing with shapes. I am trying to detect overlapping shapes created through vba on demand. I have a list of x and y coordinates and convert those to a position on a chart. The problem I am running into at the moment, is that...
  7. J

    Excel to Shapes

    Hello All, Through searches int his forum, I was able to use an Excel VBA code to produce shapes on another worksheet per Cell Value. Everything seems to work perfectly but the shapes are side-by-side. Is there a way to have the first to cell value shapes on top and the others in the bottom...
  8. T

    Runtime Error with shapes(application.caller)

    Dear Users, 1. I have a dynamic list of organisations. Through VBA I insert a rectangle as shapes. Set s = Worksheets("Tabelle1").Shapes.Addshape(62, 70, 120 150, 30) Simultaneously I assigned the created shape a macro through s.OnAction ="Macro" 2. Later this macro should plot data...
  9. D

    excel smartart labeled hierachy chart keep shapes inside leves

    Hello everyone, As I add levels using the text pane to my labeled hierarchy chart the shapes do not move or resize to remain in the labeled level. How do I keep them in the correct levels?
  10. J

    Hiding and Unhiding Columns with Shapes

    Hi Gurus, I am having an issue trying to hide/unhide columns using shapes (not command buttons). I would like to do the following: 1) have the shapes show a "ON" color and "OFF" color (which I have tried to do by overlapping shapes on top of each other 2) when a certain shape is "ON", the...
  11. A

    VBA : Hide & Show shape button that contain their own sub-shapes upon clicked

    Hi, I happened to stuck with one problem for my project. Basically what I'm trying to do is hide and show shapes containing macro. To illustrate, so each shapes has their own set of sub-shapes (let's say there are 3 shapes with each has their own 2 sub-shapes). What i have in mind is that each...
  12. A

    Macro Shape to Call another Macro Shapes

    Hi, is there a way when I clicked a shape containing macro, it could call 1 or more shapes that are also macro assigned? Thankyouu
  13. Johnny C

    Why can you only access a shape properties when the sheet with the shape on is activated?

    Just idly curious. I can't access a shapes properties unless the sheet is activated. I'm guessing the process of activating the sheet loads the sheet shapes into accessible memory, but why? Are the sheet's shapes and properties stored in an abbreviated form that is only expanded to accessible...
  14. A

    If statment when a image is clicked

    Hello guys. Im new to Excel VBA and i need help with a problem im trying to solve. I have 2 shapes and when i click the shapes the same userform appears. The value that are typed in the userform is gonna be placed in a different cell wich depends on what shape is clicked. The code i have...
  15. Johnny C

    VBA error 91 creating elbow connector

    Hi I've got a weird problem. I've got code to connect 2 shapes with an elbow connector using a function with start and end shape as parameters. Dim conlink as Shape ...other code conLink = AddElbowConnector(shpSourceSheetShape, shpTargetSheetShape) Both shapes exist and the first time...
  16. P

    Exporting a SmartArt graphic

    I dynamically generate Org Charts using the SmartArt CirclePictureHierarchy object, but I am unable to export them as PDF files in code. I thought I could use the same code as I use to export a Chart, but that didn't work. I believe exporting Shapes is doable, but I can't capture the code in a...
  17. R

    Excel VBA to change the size of all shapes in workbook

    Hello, Does anyone have VBA code whichselects all shapes in a workbook and then sizes them the same height and width(1 in X 1in). The shapes are embeddedDocuments and Packager Shell Object Below is code where I am splitting atable into multiple sheets. The splitworks great with one...
  18. N

    Excel VBA copy shapes and paste in new worksheet with blanks between each shape

    Hello, I have code that will make spaces between the shapes but I cant seem to get this code to select range on one page and paste it on another page with the blanks between the shapes. The shapes have no names. code: Sub InsertBlankRows() Dim Rng As Range Dim WorkRng As Range Dim FirstRow...
  19. S

    Change Pivot Table Field by Shape Selection Name

    I have an Excel Sheet with the World Map placed on it as individual Shapes. USA's Shape name is S_USA and when selected I want to pass the Shape's Name to the Pivot Table Filter so I can see a list of Suppliers in That country. I already have the data set up to match the shapes names. Now it is...
  20. B

    Can we fix shape position with Cell Value?

    iam giving input in A1 TO A10 In sheet 1 at sheet 2 shapes should appear with specific position as mentioned in sheet 1(A1:A10) Can i get help with this? Sub populatearrow() Dim shapi As Shape Set shapi = Sheets("Sheet 2").Shapes("Rectangle 2") Dim shap As Shape Dim x Dim position position...

Some videos you may like

This Week's Hot Topics

  • populate from drop list with multiple tables
    Hi All, i have a drop list that displays data, what i want is when i select one of those from the list to populate text from different tables on...
  • Find list of words from sheet2 in sheet1 before a comma and extract text vba
    Hi Friends, Trying to find the solution on my task. But did not find suitable one to the need. Here is my query and sample file with details...
  • Dynamic Formula entry - VBA code sought
    Hello, really hope one of you experts can help with this - i've spent hours on this and getting no-where. .I have a set of data (more rows than...
  • Listbox Header
    Have a named range called "AccidentsHeader" Within my code I have: [CODE]Private Sub CommandButton1_Click() ListBox1.RowSource =...
  • Complex Heat Map using conditional formatting
    Good day excel world. I have a concern. Below link have a list of countries that carries each country unique data. [URL...
  • Conditional formatting
    Hi good morning, hope you can help me please, I have cells P4:P54 and if this cell is equal to 1 then i want row O to say "Fully Utilised" and to...
Top