VBA 문자열 255 자 제한

Question

VBA와 관련된 문제에 직면하고 있으며 255 자까지 문자열 제한이 있습니다. 실제로 POST를 통해 JSON을 보내려하고 실행을 일시 중지하려고합니다. 문자열에 항상 255 자 밖에 없습니다.

문자열 등의 크기를 조정하는 방법이 있습니까?

Answer 1

이 문제로 약 6 시간이 낭비되어 결국 디버거 제한인지 확인합니다. VBA 디버거는 문자열의 255자를 보여 주지만 그가 보여주는 것만 포함한다는 의미는 아닙니다.

Len이있는 MsgBox를 사용하여 문자열 크기와 내용을 검사 할 때 상황이 미쳐서 표면에 묻어있는 것을 보았습니다.

많은 사람들이이 질문을했지만, 아무도 그것에 대해 이야기하지 않았기 때문에 도움이되기를 바랍니다.

Answer 2

콘솔 (바로 가기 창)에 인쇄하려면 간단히 메모장에 인쇄하면됩니다. 결과는 이론적으로 255 줄 이상 (문자 아님)입니다. 다음은 메모장에서 1에서 10.000까지의 숫자를 인쇄하는 방법입니다.

Option Explicit 

Public Sub PrintToNotepad() 

    Dim strShell    As String 
    Dim strFileName    As String 
    Dim fs      As Object 
    Dim objText     As Object 

    strFileName = ThisWorkbook.Path & "\test" & Replace(Now, ":", "") 
    Set fs = CreateObject("Scripting.FileSystemObject") 
    Set objText = fs.CreateTextFile(strFileName, True) 

    objText.writeline (GenerateBigString) 

    strShell = "C:\WINDOWS\notepad.exe" & " " 
    strShell = strShell & strFileName 
    Call Shell(strShell) 

End Sub 

Public Function GenerateBigString() As String 

    Dim i   As Long 
    Dim result  As String 

    For i = 1 To 10000 
     result = result & i & vbCrLf 
    Next i 

    GenerateBigString = result 

End Function