"KeriM" wrote:
I keep getting a
"Run-Time error '1004': Application-defined or object defined error"
[....]
Here is my code that is giving me the above mentioned error:
[....]
ComboVal = Sheets("DATA").Cells(i,DropDown_txt).value
[....]
I've also tried it this way with the same resulting error:
[....]
ComboVal = Sheets("DATA").Cells(i, 60).value
[....]
For some reason, this works with no error:
[....]
ComboVal = Sheets("DATA").Cells(i, "BH").value
[....]
Does anyone have any suggestions as to why this is happening?

Since "BH" is indeed column 60, Cells(i,60) should work as well as
Cells(i,"BH") for the same value of i.

I can only imagine the values of i and DropDown_txt are not what you expect
at the time of the error -- or you inadvertently corrected your mistake when
you retyped the examples in your posting.

(I know you retyped the examples because .value would appear as .Value in
the VBA editor after enter the statement. In the future, copy-and-paste
into your posting. FYI, .Value is not needed in this context.)

Add the following code and verify your assumptions.

On Error Go To oops ' or do this once much earlier
ComboVal = Sheets("DATA").Cells(i,DropDown_txt).value
On Error Go To 0 ' optional
[... rest of your code ....]
Exit Sub

oops:
Stop
End Sub

If you reach the Stop statement, press ctrl+G to open the Immediate Window,
and do the following:

Print i, DropDown_txt
Print Sheets("DATA").Cells(i,DropDown_txt).Address(exter nal:=True)

The last statement might produce the same error.