If I do this:

Dim theTxt as String

theTxt = Activesheet.Cells(1,1).Text

for some reason the text (which is actually 1849 characters long) is
truncated to 1024 characters.

If I do this:

Dim theTxt as Variant

theTxt = Activesheet.Cells(1,1)

I get the complete text string from the cell.

Can someone tell me why these two approaches are giving me different results?

Thanks,

Eric