I would definitely be interested in pursuing it. I do have to tell you that
I am, at best, an intermediate user, I am not strong in VBA or marcos... I
waas thinking about using a combination of the Address and Index functions,
but am not certain that that will work either. If you want to communicate
with me directly feel free to e-mail me at . Thanks.

"Gary''s Student" wrote:

With many values, the easy way is to create a table (either in a worksheet or
VBA) and use the table rather than individual lines of coding.

Also use a Sub instead of a Function to empty/fill the destination cells.

Let us know if you would like to pursue this further,
--
Gary''s Student - gsnu200741


"DA_Potts" wrote:

Thank you. This is an interesting start, however I may need to do some sort
of nesting as I actually have about 4500 options that would have to be
represented. I'm sorry I wasn't more specific in my original question

"Gary''s Student" wrote:

Function putval(i As Integer) As Variant
putval = ""
ad = Application.Caller.Address
If i = 123 And ad = "$D$3" Then putval = 125
If i = 124 And ad = "$E$3" Then putval = 125
If i = 177 And ad = "$AH$3" Then putval = 125
End Function

So put =putval(A1) in D3 and E3 and AH3
Then set A1 accordingly.
--
Gary''s Student - gsnu200741


"DA_Potts" wrote:

I want to use/create a function whereby if a value is equal to one number the
data i enter will go into one of a series of cells
example - if the value is 123 then the value of cell d3=125, if the vale is
124 the value of cell e3=125, if the value is 177 then the value of cell
ah3=125. Any suggestions?