Calculating Area Of A Shape
May 17, 2012Is there an automatic / easy way to get the area of a shape in excel (using vba or otherwise)?
View 1 Replies
ADVERTISEMENT
Data On Clipboard Is Not Same Size And Shape As Selected Area?
Dec 15, 2013How to turn off or default the warning box message ...
"Data on the Clipboard is not the same size and shape as the selected area. Do you want to paste the data anyway"
I hate having to click yes on this every time I paste something. I do it hundreds of times a day.
My tables is centered and merged because my external date changes sizes each time I paste to the table.
I have looked all over to try and find an "OFF" warning/message button for this. I just want to know how to turn it off or default it to never pop up again!
Change Shape Text Without Selecting Shape
Mar 4, 2009when i run the below code i get an error 438 'object doesnt support this property or method'
View 2 Replies View RelatedPrint 2 Selected Area (highlighted Area)?
Apr 11, 2013How can I print 2 selected area (highlighted area). I know there is a trick to do that. Right now I can only select (highlight) one area to print, but would like to know how to print 2 or more areas at same time
View 7 Replies View RelatedLocate A Shape Within A Shape
Jan 24, 2014On the attached spreadsheet there is two irregular shapes. "Area1" & "Area2". I need to be able to determine which area the "ball" shape is located in. If the ball is in Area1 then "Multiply 8" gets the ball and "Multiply 9" moves to the blue cell "AH39". If the ball is in "AreaB" Multiply 9 gets the ball and "Multiply 8" runs to cell "S37"
I should be able to do the moving of the shapes using all the samples, its determining which area the ball is in is the problem.
In the real spreadsheet i will probably have around 10 different Areas.
Move Two Objects - Select Case.xlsm
Programmable Print Area: Macro To Set The Print Area According To The Amount Of Data In A Particular Range Of Cells
Feb 25, 2009Using Excel 2003 I am trying to write a macro to set the print area according to the amount of data in a particular range of cells. I find I can include this instruction
View 2 Replies View RelatedGraph The Following Data In An Area Chart With Line Charts Superimposed On The Area Chart
Nov 1, 2006I am trying to graph the following data in an area chart with line charts superimposed on the area chart. I have a lot of data (and a lot going on) so I'm trying to figure out the best way to show this in excel from a functional standpoing (i can't get this to work in excel!!) to also an asthetic standpoint (dont want it to look terrible or illegible). This is what I'm trying to chart:
1) Weather data (temperature) by region:
So one region, would be: Northwest
I would like the "area" (so a shaded region) to be the min/max of the temperature data for each month.
2) I would like to show the temperature for each year as a line graph on the chart - so you can see if a year falls in or out of the shaded region.
3) I would like to show a company's sales increases across the same months per year as separate line charts. I may choose to just show the biggest outlier year in the end... or to show 2006 (the latest data).
What I am trying to convery with the chart is that the company's sales is or is not tied to weather deviations. I have attached an excel file with the data. I haven't been able to use the area chart or get a two axis chart to work or get it to look even remotely professional.
How To Set Fixed Print Area In Excel So Cells Within Print Area Can Still Be Modified
Feb 12, 2013I have a workbook with multiple sheets that I need to print.
Is there a way to create a fixed print area within which you can mess around with formatting without extending or shrinking the print area?
I have tried adjusting the margins settings so that they are all the same, but this does nothing to keep a fixed print area.
If Formula: =IF(D4<0.38,"Thin",IF(0.38<D4<=0.48,"Good Shape","Bad Shape"))
Jun 23, 2009I have D4=0.42. I thought this formula =IF(D4<0.38,"Thin",IF(0.38<D4<=0.48,"Good shape","Bad shape")) was supposed to give me "Thin" for D4<0.38, "Good shape" for 0.38<D4<=0.48 and "Bad shape" for the contrary, but it only gives me "Bad shape" when D4 is clearly between 0.38 and 0.48.
View 4 Replies View RelatedIF On Shape
Aug 24, 2009code doesn't work
Sub test()
If ActiveSheet.Shapes.Name = ("five") Then
Range("B4").Select
Else
Exit Sub
End If
End Sub
Change Shape Name
Feb 2, 2010I have a shape in Excel called Canada. I grouped it with another shape and want this new grouping to be called Canada. But when I enter Canada in the shape name entry box, it doesn't actually change it (as it thinks I am referring to the existing Canada).
I need something like Names manager, but for shapes, not ranges.
Shape A Textbox
Apr 1, 2008Is it possible to find out if the selected item is a textbox through VB?
Get The Name Of The Shape Clicked
Jan 21, 2009Is there any way that I can get the name of the shape i just clicked to call a procedure?
I have 35 shapes in my Worksheet.
Each shape has a different name. Each shape has a macro procedure assigned, wich do almost the same procedure (with just small differences, depending on from wich shape the macro was called).
I want to make just one macro procedure and catch from wich shape the macro was called.
VBA Keep Shape Static?
Mar 21, 2014How do i Keep shape where it is no matter if i scroll up or down.
Sub KeepshapeStatic()
Dim ws As Worksheet
Dim shp As Shape
Set ws = Sheets("Sheet1")
Set shp = ws.Shapes("MyShape")
'How do i Keep shape where it is no matter if i scroll up or down
End Sub
Add Shape & Rotate
Jan 2, 2007i am trying to draw a shape (square or rectangle) using vba textbox's i have managed to draw 2 of the 4 lines.
i am stuck on the ShapeRange.Flip msoFlipHorizontal codeing.
i have attached a example of what iam trying to do.
the coorinates from the last line enterd are saved to sheet1 for use with the next line entered ...
Shape On A UserForm
Dec 29, 2007I want to create a shape connecting them and place that shape on a userform. I can create the area without any problems on a worksheet using ActiveSheet.Shapes.BuildFreeform but I don't know how to get it onto my userform.
I have looked through previous posts on similar topics and seen responses that it's as easy as copying the shape from the worksheet and pasting it into an image or frame on the userform. I can copy the shape to the clipboard without any problem. However, when I try to paste it onto an image or frame in a userform I get a message saying that the object doesn't support the use of paste. I've tried using both Selection.Copy and Selection.CopyPicture xlScreen, xlBitmap thinking it might treat a bitmap differently. When I paste I'm trying both UserForm1.Frame1.Picture.Paste and UserForm1.Image1.Picture.Paste but neither work, even though I have blank images and frames with those names on my form.
Identify Activecell Of A Shape?
May 24, 2014I have put a rectangle shape in a cell in excel. The shape is within the border of a particular cell.
Is there a way to find the reference of the cell on which that particular shape resides.
For example, I have kept a rectangle shape in cell F5. I was looking for a macro which would return the cell reference "F5" in which the shape resides.
Formula For S Shape Curve?
Dec 13, 2013I have a few dates and one Total value. I need to distribute this Total Value in such a way so I can get the same shape S curve (Date vs Value).
View 4 Replies View RelatedMake A Shape Into A Button?
Dec 5, 2012I really dislike the look of the command buttons and would like to use a nice flat-looking Shape into a functional button.
View 3 Replies View RelatedControl Tip For Shape In Worksheet?
Jul 15, 2014Is there any way to place a Control Tip for a shape on a excel worksheet?
View 3 Replies View RelatedMulti Arc Shape In One Group?
Jul 18, 2014How to draw multi Arc Shape in Union group Locks Like (Smiley Face 11)
View 2 Replies View RelatedHow To Get The Cells In Which The Shape Object Is There
Mar 12, 2009I have a shape object which is created dynamically.
Now onAction event of the shape object, I need to get the cells row and column number where the shape object is sitting. How can i get it?
Check If Shape Exists
Mar 30, 2009how do i check if a shape exists?
i have a shape created by a macro.
sShape
so when i get rid of this shape i use
Accessing The Properties Of A Shape
Apr 2, 2009How does one access the properties of a shape? For instance getting the text on a button ( from the forms toolbar ) on a worksheet. This works
View 4 Replies View RelatedFind Out If Shape Has Text
Aug 4, 2009Have an .xls file with multiple sheets and many objects (Shapes) on of those sheets.
The objects are all rectangles, some of which contain text frames, where I had entered manually some text.
Also, each shape has a name.
Now, I want my VBA Macro to take a specific shape (using its name), and find out if it has text frame in it.
Which Hyperlink Was Clicked And Associated Shape Name
Feb 10, 2010How do I capture which hyperlink has been clicked (selected in any fashion)?
Then get associated shape name.
Hide Shape When Hiding Row?
Feb 20, 2012I have a macro which hides rows in excel. The lines that I am hiding have a "Rounded Rectangle" shape inserted with a hyperlink. I want the shapes to be hidden as well when I hide the rows. However, when hiding the rows, the shapes persist. Is there a way to hide the shapes as well?
I am hiding the rows via the following vba code...
If Range("CurrentVersion").Value = "1" Then
Rows("20:25").EntireRow.Hidden = True
Else
Rows("20:25").EntireRow.Hidden = False
End If
How To Get Inputbox Name A Shape Within Workbook
Apr 11, 2012I am trying to get an inputbox name a shape within my workbook. This is what I have so far and i am getting a Run-time error ("The specific value is out of range") on the part in red.
Code:
Dim MyInput
Sheets("List Form").Select
ActiveSheet.Shapes.Range(Array("BlankTestButton")).Select
Selection.Copy
Sheets("For Copy").Select
Range("A36").Select
ActiveSheet.Paste
[code].....
Resetting Shape Locations
Apr 12, 2012I have many spreadsheets that use shapes such as arrows and other symbols. The process for these spreadsheets is to move the shape (arrow for Ex) to indicate a specific location of pain or something like that.
Once the arrow is in position, the spreadsheet is printed to PDF and and a snapshot (in adobe) is "taken" and the picture (with the arrow) is pasted into our application.
My questions is how can I move the shapes back into position when you want to do it all over again.
When I have a few shapes I use
PHP Code:
Set sShape = ActiveSheet.Shapes("Right Arrow 6") 2
With sShape
.Top = 220
.Left = 91
.Rotation = 20
End With
For each shape
But if I have lots of shapes, 50+, it's a bit more cumbersome.
Can I loop through the shapes when I enable the macros to pick up the current positions and use that information when I do a reset (loop back again to move any shape that were touched back to where it was when the spreadsheet was opened?
Currently I have them close the spreadsheet without saving and just reopen.
How To Move A Pasted Shape
Mar 2, 2013I Have several images on Sheet 1, I can copy the needed Images to sheet 2 as needed.
Once the image is pasted to sheet2 how do I assign it to a shape variable so that I can position it as desired.
I do not want to have to use Sheet2.(Range("B2").activate or similar
I'm looking to use
Shp.top = 25
Shp.left =15
Code:
Sub Macro1()
Dim Shp As Shape
Sheet1.Shapes("Picture 1").Copy
Sheet2.Paste
'To set the shape variable to the shape on sheet2
Set Shp = "WHAT GOES HERE"
Shp.Top = 25
Shp.Left = 15
End Sub
