Q: UDF with Interior.colorindex Help needed

Hi
I wrote a short function "interior"

Function interior(Rng) As Integer
Application.Volatile True
interior = Rng.interior.ColorIndex
End Function

And that works if I call a function with for instance =interior(c3) an i got
color index of cell c3
but I need color index of cell that contains the function ,
something like if in C3 I put =row() I will got 3

How to do this?

Thank you for reading this especially if you are able to help me out on
this.
Maxx

Potpis

DVal

Function interior1() As Integer
Application.Volatile True
interior1 = Application.Caller.interior.ColorIndex
End Function

U spreadsheet pišeš:
=interior1()


Izgleda da se ova funkcija ne aktivira prilkom ponovne promene boje u ćeliji. Ovaj kod treba staviti u modul Sheet-a za koji se prati promena boje u ćeliji.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Calculate
End Sub