Trent,
Just delete the .Select as it achieve nothing, then this will work:
f_GetSeqNumber = r.Offset(0, 1).Value
However, you cannot change a value, so this is not possible from a UDF:
r.Offset(0, 1).Value = r.Offset(0, 1).Value + 1
NickHK
"Trent Argante"
...
NickHK,
It's the
f_GetSeqNumber = r.Offset(0, 1).Value
-AND-
r.Offset(0, 1).Value = r.Offset(0, 1).Value + 1
lines that I need the most.
1. Are these two lines considered as being in the "Excel environment?"
2. Can I get around this by accessing the cells via Activecell?
Trent Argante
[DC.J(510)]
*** Sent via Developersdex http://www.developersdex.com ***