Macro To Enter Shape Or Picture?

Sep 30, 2012

I am making a spreadsheet file for our football offcials group to review rules.

I tried to record a macro to copy a shape and put it into the spreadsheet, but the shape does not copy.

How do I get the shape to copy into the spreadsheet?

What I want is for them to "think" what they would do and then click the macro and it will show them where the ball would be after the foul/fouls.

View 2 Replies


ADVERTISEMENT

Fill Shape With Picture 2007

Aug 21, 2007

The following works perfect in 2003.

Private Sub CommandButton1_Click()
Dim shpTemp As Shape
Set shpTemp = Worksheets("Sheet3").Shapes(ListBox1.Value)
shpTemp.Copy

With Worksheets("Sheet1")
.Activate
. Range("A1").Select
.Paste
Set shpTemp = .Shapes(.Shapes.Count)
shpTemp.Fill.UserPicture ListBox2.Value
End With
End Sub

However, when run in excel 2007 the shape is not filled. If you right click the shape, format shape and click on the "Picture or texture fill" it will fill the shape with the previously selected picture in the userform. I have tried by adding

shpTemp.UserPicture.Fill.Visible = True....................

View 9 Replies View Related

Link Cell To Picture Or Shape

Oct 18, 2007

It's difficult to explain, the attached shows the situation better. Basically there's a picture that is somehow linked to a cell. But, you can update the picture or the cell and the other one gets updated.

View 2 Replies View Related

VBA Import Picture Change Shape To Rectangle

Apr 5, 2014

I already have the code to import the picture but i would like it to have rounded corner's. The option if you select the picture then tick format, picture shape and it's the second rectangle in. I can not seem to find that particular piece of code for that particular shape. The other comparison is the (reflected beveled, black) option under picture format.

[Code] .....

View 2 Replies View Related

Change Shape Fill To Picture When Another Cell Equals To 1

May 14, 2014

I have set up a rollover hyperlink so that when I hover over the cell it changes colour and creates a good effect. To do this I have another cell on the sheet that turns to 1 when the cell in question is hovered over.

I need a code so that when that cell displays the number 1. the object (which is rectangle 2) changes from white fill. to a picture I have saved on my desktop.

I cant quite figure out the coding and have been messing about with things like..

if cell range e.g a1 = 1 then rectangle 2 .userpicture " path " else .solid etc.

View 10 Replies View Related

Create Excel Shape From MapInfo *OR* Make Picture Background Transparent?

Aug 13, 2008

I'm trying to make a map of 14 regions where each region changes brightness depending on values in the worksheets. I think I've got this bit sorted. I'm planning on creating the map using a collection of tessellated shapes or images, and using VBA to alter the properties of each one to create a dynamic map.

The output of the individual maps from MapInfo, our GIS software, is in .png or .jpg. format, and come with a white background. Is there any way to either make the background transparent so multiple shapes can be tessellated effectively, or a way to crop the image to the area's border?

Either that, or does someone know a way to output from MapInfo in such a way to make this possible? (Granted, it's a long shot, but you can't blame a guy for trying...)

View 9 Replies View Related

Change Shape Text Without Selecting Shape

Mar 4, 2009

when i run the below code i get an error 438 'object doesnt support this property or method'

View 2 Replies View Related

Assigning Macro To Shape In 2007

Dec 5, 2008

I posted similar yesterday. No one helped...sniff sniff (where's the crying smily)

Now verified to be occur on other machines running various versions of Office 2007...

In Excel 2007, write this simple macro and assign it to a shape:

View 6 Replies View Related

How To Add Formatting To Shape Creation Macro

Aug 7, 2013

I have to create an identical button on 20 sheets.

I have a shape creation macro but it creates in the default format.

Can I either change the default format so they are created in the way I want or code to add formatting? I need no shadow, can colour (pref with gradient fill), bevelled edges and text.

Sounds like the first option will be easiest if it works!

View 1 Replies View Related

Macro To Select Shape To Print Off

Jan 2, 2014

I created a shape and named it Cheque and created a macro to print the shape as follows:

ActiveSheet.Shapes("Cheque").PrintOut

But the macro is not printing!

View 4 Replies View Related

VBA Macro To Move Shape Around Spreadsheet

Dec 16, 2009

I am trying to write a set of code, part of which involves moving a shape around an excel spreadsheet in a square shape within a certain range. It is based on a random number generator. The shape moves a number of cells to the left/right/up/down depending on the random number (d) multiplied by 16. If the shape reaches a row or column border point, it will change direction but continue moving in the new direction until it has gone as far as was determined by the random number (*16). I have some code which works fine... to a point! The shape starts out, reaches a right hand border, changes direction to go up, reaches another border, changes again and goes left, but then when it comes to change dorection the 3rd time and go down, it fails. The direction of the shape is determined by a word in cell A1 - left/right/up/down:

Sub MoveRed()
Application. ScreenUpdating = True
Dim d As Integer
Dim i As Integer

d = Range("AZ1").Value

With ActiveSheet.Shapes("RedDot")
For i = 1 To 16 * d

Select Case Range("A1").Value
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

View 9 Replies View Related

Using Shape To Call Macro (Filepath Error)

Apr 9, 2014

I am changing command buttons over to shapes for aesthetic purposes. I went to assign a macro to call useform4 using a rectangle with the following code:

[Code] .....

It throws me some kind of file path error which makes no sense. Do I have to dim the rectangle2 for active sheet or something?

View 11 Replies View Related

Run Macro After Leaving Shape Editing Mode?

May 14, 2014

I've got a macro function which calculates the area of a polygon freeform using the 'shoelace'-methode. I would like to excute this function after i leave the shape editing mode.

For example: I have a square, freeform shape. By right-mouseclick I can edit the shape nodes. If i drag one of the nodes of the square to another position and click outside of the shape, the new shape is updated. Right, on that moment i would like to trigger my macro to recalculate the area.

Is there an event in excel to aim for, like the Worksheet.change-event or something similar?

View 2 Replies View Related

Automatically Assigning Macro To Any Shape Created

Aug 14, 2014

I've got a macro that I can rund when I click on a shape. It's called "Shape_Click".

Basically, I want this macro to be automatically assigned to any shape I create, as I create it.

I know the line will be something like: [Code] ........

View 6 Replies View Related

Automatically Assigning Macro To Created Shape?

Aug 14, 2014

I have a macro that runs when I click on a shape. This macro is called "Shape_Click"

I can apply that to a shape by selecting it and manually running this macro:

[Code] .....

How do I get the subroutine to run as soon as the new shape has been selected, rather than haviong to manually run it.

Something like "Sub Worksheet_ShapeAdded" or something like that? I can't work it out.

View 2 Replies View Related

Determine Shape Clicked For Running Macro

Nov 19, 2008

I have map shape in my excel sheet. each country is a shapes on its own. If i Select one of the country i want to display a pop up Box. For examle if i select Americas I need it to display another box with some data and when i deselect it it should hide the box. Tried some code over here but does not work.

Sub HideShowRectangle()
With ActiveSheet.Shapes("Data1")
If ActiveSheet.Shapes("Americas").Select = "True" Then
.Visible = True
Else
.Visible = False
End If
End With
End Sub

View 5 Replies View Related

Excel 2002 :: Activate Macro By Clicking A Shape

Feb 3, 2013

I found in an old file that i triggered the macro by clicking a button! I would post a pic but i don't know how. How do I activate a macro by clicking a shape on the excel 2002 page?

View 7 Replies View Related

Excel 2010 :: Paste Picture Into Small Picture / Diagram Box?

Mar 19, 2012

In Excel 2010, is there any way to paste a picture into a small picture/diagram box, and upon double clicking the picture it would explode to a larger size? And I guess double clicking it again would make it return to its original (smaller) size. I would be pasting several pictures into several different picture/diagram boxes and would need this to be a relative reference so that upon selection it explodes the appropriate picture?

View 1 Replies View Related

Put Chosen Picture In Comment & Retrieve Picture On Other Sheet

Nov 18, 2007

I want to have a sample file in excel which store picture of student in comment, I did this, but when I want to insert picture the file dialog appears, and if I click cancel, then there is an error, why? If some one optimise the code it would be very nice

View 6 Replies View Related

Picture Macro ...

Oct 16, 2009

I copied this from another post and am having trouble getting it to work for me. I want to be able to run this macro, find a picture on my computer which could be located anywhere and then have it paste in specific cells.

Whenever I run this it lets me find the picture I want and when I select it I get error message that says "compile error" Syntax Error". It then does not put the picture on the sheet.

I tried to zip and attach the work sheet multiple times but keep getting error message and won't let me attach......"forum excel database has encountered a problem" ....

View 9 Replies View Related

Macro For Pop-up Window With Picture

Jul 19, 2007

A macro, which would allow me to click on a particular cell, which will have an ID number (1 through 34), each ID# is attributed to a particular employee. These ID# are located in my spreadsheet in columns B & G, and the ID #'s begin initially in B6 & G6 and continue downward to B34 & G34. These ID #'s are used in a vlookup type formula which covers 35 pages of this workbook. What I'd like to do is be able to click on any cell between B6& B34 (and/or the same in G6&G34), which has a particular ID # in it and have the photo of that particular employee designated with that ID# pop up in a window generated by the macro. I hope this makes sense! Any help would be greatly appreciated. My 1st sheet in my workbook is my "lookup" tab, which contains my ID# list and numbering sequence affiliated to each employee. So I'm not sure if I'd need to put the photograph of the employee in a column next to the employees name or have a folder designated with all my pictures in a certain directory, etc.

View 11 Replies View Related

How To Open .jpg Picture With Macro

Feb 23, 2009

I use the following macro to open excel files. Can this be modified to open a picture ppppp.jpg?

. . . or, can someone help me with a new macro that can open pictures

. . . I would still like to have the file checking options to see if the picture is already open and if not, that it actually exists.

View 11 Replies View Related

Format A Picture With A Macro

Oct 11, 2009

I'm watching an educational D V D on my computer, and take notes in excel. I repeatedly use the print screen command, then go to excel and paste in the picture, though it is too large. I resize it to 50% and I'm done. What kind of code do I need to use to paste and shrink the picture to 50%? Also, how do I attach a shortcut key to this action (for example Ctrl+M)

View 14 Replies View Related

Macro: Does Picture Exist

Nov 30, 2006

I have been able to piece together something that works great for me till i tested it on a item that I did not have a picture referanced to it.

I am looking for some help with what i guess is an "if" statement that if no picture is found paste "Sorry no picture found" in c3.

Here is code

Sub Copy_Cells()
'Copying the row
addr = ActiveSheet.Shapes(Application.Caller).TopLeftCell.Address
Intersect( Range(addr).EntireRow, Range("b:ak")).Select
Selection.Copy Sheet2.Range("b65536").End(xlUp).Offset(0, 0)
Sheets("sheet3").Select

'Picture code
MyPicturesName = Sheets("sheet3").Range("i5").Text
Sheets("sheet5").Shapes(MyPicturesName).Copy
Sheets("sheet3").Range("c3").Select
ActiveSheet.Paste
Range("a1").Select

'hide tabs
Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Visible = False

End Sub

View 4 Replies View Related

Display A Picture In A Cell When The Picture Name Is Selected

Jun 18, 2014

I have done the above where when I select a picture name from a drop down list it displays the relevant picture in another cell by using the IF function in the named formula

My question is why cant I use VLOOKUP instead of IF in the named formula. When I use it it comes with an error.

View 6 Replies View Related

Macro To Remove Picture Border Or Set It To None

Aug 13, 2012

I have a picture that has been inserted into a worksheet via a macro and I have a number of macros to increase and decrease size. They work fine.

However, whenever I run one of those macros by selecting a button on the worksheet, it results in a border around the picture.

Facts:
- worksheet is called "Admin"
- picture is called "ClientLogo"
- Line.Weight set to "0" or "False" or "xlNone" or removed all result in a border

Question: Code / syntax for removing or setting the border to nothing?

VB:

Sub ReduceShape()
Dim shp As ShapeRange
On Error Goto NoSelectionMade
Sheets("Admin").Shapes("ClientLogo").Select
Set shp = Selection.ShapeRange

[Code]...

View 2 Replies View Related

Insert Name Of Picture In Excel VBA Macro

Apr 18, 2014

The following macro enables be to insert picture from a given location. My query is I want to insert the picture name once the pictures are inserted in the excel worksheet.

[Code] .....

View 3 Replies View Related

Macro: Variated Background Picture

Feb 27, 2009

My macro generates some graph from some datas. Datas are in some range and when I filtering it shows only filtered values. I use Fixed axis (min and max) because if I use Auto it fit data to the window.

My problem is: I would like to use Auto axis because my layout would be better but bacground picture remains the same and it's useless. Background picture should change as I change filters.

example:

untitled.JPG
here is picture:
current situation is 1.

With Auto axis I get 2. (blue B and green D are filtered results)

And I would like to have 3.

Is it possible that background picture variate as datas variates?

View 11 Replies View Related

Macro To Show A Picture Based On A Certain Cell?

Apr 25, 2014

macro which can show a picture of a certain cell and if I change the value of that cell the picture will be changed to the new cell value,

Like

If I put in cell A1 value DOG, so the pic in cell B1 is a dog pic that I defined before, and if I change that value to a cat, the pic should be changed to another pic.

View 1 Replies View Related

Automatically Refresh Picture Links With A Macro?

Mar 13, 2014

I'm working on a dashboard that shows some market developments. One of the problems is that I'm using linked pictures and a combo box to choose the appropriate graph, but sometimes the picture link returns a blank. Apparently this is a bug that can be fixed by running a macro that refreshes the picture link. Unfortunately I'm a real beginner with this kind of stuff.

View 1 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved