Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Make same picture appear more than once
Hi I have the macro working for inserting different pictures but what if I
want to see the same picture output more than once without changing the picture name. In another worksheet, I have the a list with the name and picure number. When the name matches the corresponding picture, it will show but for example, if there were three of the same name only one picture will show and the other two will be blank. Below is the code I'm using. Private Sub Worksheet_DD() Dim oPic As Picture Me.Pictures.Visible = False With Range("B16") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With With Range("B22") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With and continues with more coding Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Make same picture appear more than once
dd,
You need to copy and paste the picture, then name it in a way that you can later delete it (so, no, you cannot output it more than once without changing the picture's name). I have an example workbook that shows the technique. Email me privately and I will forward it to you. (Reply, then take out the spaces and change dot to .) HTH, Bernie MS Excel MVP "dd" wrote in message ... Hi I have the macro working for inserting different pictures but what if I want to see the same picture output more than once without changing the picture name. In another worksheet, I have the a list with the name and picure number. When the name matches the corresponding picture, it will show but for example, if there were three of the same name only one picture will show and the other two will be blank. Below is the code I'm using. Private Sub Worksheet_DD() Dim oPic As Picture Me.Pictures.Visible = False With Range("B16") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With With Range("B22") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With and continues with more coding Thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Make same picture appear more than once
Bernie
I emailed you. Thanks "Bernie Deitrick" wrote: dd, You need to copy and paste the picture, then name it in a way that you can later delete it (so, no, you cannot output it more than once without changing the picture's name). I have an example workbook that shows the technique. Email me privately and I will forward it to you. (Reply, then take out the spaces and change dot to .) HTH, Bernie MS Excel MVP "dd" wrote in message ... Hi I have the macro working for inserting different pictures but what if I want to see the same picture output more than once without changing the picture name. In another worksheet, I have the a list with the name and picure number. When the name matches the corresponding picture, it will show but for example, if there were three of the same name only one picture will show and the other two will be blank. Below is the code I'm using. Private Sub Worksheet_DD() Dim oPic As Picture Me.Pictures.Visible = False With Range("B16") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With With Range("B22") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With and continues with more coding Thanks |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Make same picture appear more than once
I am having exactly the same problem. Could you email the example worksheet.
Many thanks "Bernie Deitrick" wrote: dd, You need to copy and paste the picture, then name it in a way that you can later delete it (so, no, you cannot output it more than once without changing the picture's name). I have an example workbook that shows the technique. Email me privately and I will forward it to you. (Reply, then take out the spaces and change dot to .) HTH, Bernie MS Excel MVP "dd" wrote in message ... Hi I have the macro working for inserting different pictures but what if I want to see the same picture output more than once without changing the picture name. In another worksheet, I have the a list with the name and picure number. When the name matches the corresponding picture, it will show but for example, if there were three of the same name only one picture will show and the other two will be blank. Below is the code I'm using. Private Sub Worksheet_DD() Dim oPic As Picture Me.Pictures.Visible = False With Range("B16") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With With Range("B22") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With and continues with more coding Thanks |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Make same picture appear more than once
Bernie's workbook can be found at Debra Dalgleish's site.
Alows for more than one picture to be displayed based upon a value or item chosen from DV lists http://www.contextures.on.ca/excelfiles.html#DataVal DV0049 - ClipArt Selection Edit the code to suit. On Tue, 22 Jul 2008 09:20:01 -0700, TheSurreyChef <thesurreychef-microsoft @ yahoo dot co dot uk wrote: I am having exactly the same problem. Could you email the example worksheet. Many thanks "Bernie Deitrick" wrote: dd, You need to copy and paste the picture, then name it in a way that you can later delete it (so, no, you cannot output it more than once without changing the picture's name). I have an example workbook that shows the technique. Email me privately and I will forward it to you. (Reply, then take out the spaces and change dot to .) HTH, Bernie MS Excel MVP "dd" wrote in message ... Hi I have the macro working for inserting different pictures but what if I want to see the same picture output more than once without changing the picture name. In another worksheet, I have the a list with the name and picure number. When the name matches the corresponding picture, it will show but for example, if there were three of the same name only one picture will show and the other two will be blank. Below is the code I'm using. Private Sub Worksheet_DD() Dim oPic As Picture Me.Pictures.Visible = False With Range("B16") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With With Range("B22") For Each oPic In Me.Pictures If oPic.Name = .Text Then oPic.Visible = True oPic.Top = .Top oPic.Left = .Left Exit For End If Next oPic End With and continues with more coding Thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
make a picture a chart | Charts and Charting in Excel | |||
How do I take a picture and make it a graph in Excel? | Charts and Charting in Excel | |||
Can I make my Hyperlink a picture? | Excel Discussion (Misc queries) | |||
how to make a picture pop-up when selecting a cell? | New Users to Excel | |||
How can I make a picture of my Excel sheet? | Excel Worksheet Functions |