más de 255 caracteres en una celda de excel

[lokoman]

Probe y me sale todo bien:

Código vb:

Private Sub cmd_Click()
    Set objexcel = New Excel.Application
    Set wbCupon = objexcel.Workbooks.Open("D:\Me\Down\New\Exe\Libro1.xls")
    j = 1
    
    With objexcel.ActiveSheet
        stxt = .Cells(j, 1)
        Do While stxt <> ""
            cadNFLl = cadNFLl & .Cells(j, 1).Value
            j = j + 1
            stxt = .Cells(j, 1)
        Loop
        .Cells(j, 1).Value = cadNFLl
    End With
End Sub
 

Nota: Puse una referencia a Excel 11.0. La cadena es de 287 numeros.