link to a pic

[Chris Davison]

Hi all,

I know how to put a pic as a comment background (ie family photo, or a landscape etc etc when the mouse hovvers over the cell)

is it possible to make it conditional on the contents of the cell ?

ie

I have a range of cells A1 to A6 containing the results from the last F1 race :

Schumacher
Montoya
Raikkonen
Irvine
Webber
Salo

can I make the comment background pic *conditional* on what's in the cell so it shows a pic of Montoya or Salo or even Jensen Button if he ever makes it into the finishing 6.....

I suspect it's a VBA solution

thanks
Chris


marker schumacher
This message was edited by Chris Davison on 2002-05-19 11:51

 

[Chris Davison]

DK,

mine are Peggsy's sister from Dreamteam !

Mmmmmmmm

 

[Jack in the UK]

DK and Chris --- your sick men i tell you!

Me i would have amonated Excel XP logo but then as you know i am sad git boaring and talantless.

Such is my part of South London!

On pulling you leg guys...

Cheers Chris. Ivan has paln down uners for his guys so i have a sneeky my old pal will compeat his guys in NZ against our UK pals in a stand off, thier compitition against us.

Ivans dead on and knows the rule FIA rules and Ivan a man of honesty so tell you this FUN FUN FUN how cool; is that.!

 

[Chris Davison]

Jack - updated version in yer otmail

 

[Ivan F Moala]

On 2002-03-10 07:55, Chris Davison wrote:
Jack - updated version in yer otmail

Hey Chris et All thanks for the File.....
we'll see.....


cheers all

Ivan

 

[Penfold]

Ivan (or anybody else), can you explain what the Target variable in the following line does:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

It is obviously grabbing some sort of range address but is it the active cell, the active sheet or what? And I take it this macro is acivated as soon as a user does *anything* in the sheet?

Thanks

Penfold

 

[Ivan F Moala]

On 2002-03-11 00:03, Penfold wrote:
Ivan (or anybody else), can you explain what the Target variable in the following line does:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

It is obviously grabbing some sort of range address but is it the active cell, the active sheet or what? And I take it this macro is acivated as soon as a user does *anything* in the sheet?

Thanks

Penfold

It is indeed the Activecell of the Activesheet
It is a Event procedure...A selection change
procedure applicable to the sheet the code resides in.
So when a user changes selection either by
cursoring to or clicking on or tabing to a
diff cell this Event fires....


Ivan

 

[Penfold]

Thanks Ivan. I tried out the code and was impressed with the results, except that it bombs if you select a range of cells with the mouse - presumably because the macro relies on adding notes on a cell by cell basis.

Anyway, its given me plenty of ideas to experiment with! Thanks again.

Penfold

 

[Ivan F Moala]

On 2002-03-11 01:11, Penfold wrote:
Thanks Ivan. I tried out the code and was impressed with the results, except that it bombs if you select a range of cells with the mouse - presumably because the macro relies on adding notes on a cell by cell basis.

Anyway, its given me plenty of ideas to experiment with! Thanks again.

Penfold

For the event code change to this

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rgF1 As Range

If Target.Cells.Count > 1 Then Exit Sub

Set rgF1 = Range("A1:A6")
Set rgF1 = Application.Intersect(Target, rgF1)
If Not rgF1 Is Nothing Then
CommentPict (Target.Value)
End If
End Sub


Ivan

 

[Jack in the UK]

MARKER Comment Images

 

[Askar]

Dear Ivan,

I have tried your code, but it gives me an error "Compile error: Argument not optional" on this line in the code:
".Comment.Shape.Fill.UserPicture Pict"

Would you please help me.
Thanks
Askar