Hi
I have this simple test function that I'm using in order to learn how to use
Offset:
Code:
Option Explicit
Option Base 1
Public Function PT_Flash(P As Double, T As Double) As Double
Dim PT_Value As Double
ActiveCell.Offset(10, 10).Value = "test me"
'the line above gives a error.
PT_Value = P * T
PT_Flash = PT_Value
End Function

But no matter what I have tryed I cannot get the line with
"ActiveCell.Offset" to work, is allways give me error 2015
Any hint to as how to use ActiveCell.Offset?

Thanks Torben



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.572 / Virus Database: 362 - Release Date: 27/01/2004