Determine data type

[campster]

I'm using typeof to determine the type of an object and keep getting an error that says: Argument 'Number' cannot be converted to a numeric value. The error occurs on bold line below.

[B]If TypeOf Str((CType(oShtData.Cells(2, 1), Excel.Range).Value)) Is String Then[/B]
            'Copy variable names from the data worksheet.  This data was imported form the CSV
            CType(oShtData.Rows(2), Excel.Range).Copy()
            'Transpose and Paste the data into the Control worksheet
            CType(oShtCont.Cells(2, 8), Excel.Range).PasteSpecial(Excel.XlPasteType.xlPasteValues, , , True)
        End If

If I debug the this line it looks fine. The difference is that I cannot use ctype in the watch window.

[campster]

Ok, here's a subtlety that I don't understand. The line below works

If TypeOf CType(oShtData.Cells(2, 1), Excel.Range).Text.ToString Is String Then

Edit: Nevermind. It worked in the sense that it didn't throw an error but it did not logically work. Because I "converted" the data to a string, everything was a string and I got data that I didn't want.

[VBDT]

try this

If TypeOf CType(oShtData.Cells(2, 1), Excel.Range).Value Is String Then
 
 End If