That is because you are passing a string variable into a range - Type
mismatch. Pass the cell itself

insertFormula(intcount, ActiveCell)


--

HTH

RP
(remove nothere from the email address if mailing direct)


"Jason" wrote in message
...
Hi,

I'm using Office XP, I'm having a problem referencing the address of the
activecell. Here is a snip of my code

insertFormula(intcount, ActiveCell.Address(False, False, xlA1)

which is passed to

Function insertFormula(intcount As Integer, ByVal Target As Range) As
String

I keep getting a 'Type Mismatch' error that highlites .Address.

Help is much appreciated.
Jason