VBA를 사용하여 셀 형식을 텍스트로 변경하려면 어떻게 해야 합니까?

VBA를 사용하여 셀 형식을 텍스트로 변경하려면 어떻게 해야 합니까?

Excel 시트에 "기간" 열이 있습니다.셀 형식은 항상 변경됩니다. 지속 시간을 분 단위에서 초 단위로 변환하고 싶지만, 셀 형식 때문에 항상 다른 답변을 얻을 수 있습니다.

변환하기 전에 셀 형식을 텍스트 형식으로 변환하여 텍스트 값으로 간주하고 자동 형식을 적용하지 않도록 할 수 있을 것 같습니다.

현재 모든 데이터를 메모장에 복사한 후 Excel 시트에 저장하여 이전 포맷을 모두 삭제하고 있습니다.VBA를 사용하여 셀의 형식을 텍스트로 자동 설정할 수 있는 방법이 있습니까?

귀하의 직접적인 질문에 대한 답변은 다음과 같습니다.

Range("A1").NumberFormat = "@"

아니면요?

Cells(1,1).NumberFormat = "@"

그러나 실제로 표시하고자 하는 형식으로 변경하는 것이 좋습니다.이렇게 하면 셀에 데이터 유형을 유지하고 셀 공식을 사용하여 데이터를 쉽게 조작할 수 있습니다.

1점: 번호를 설정해야 합니다.값을 셀에 로드하기 전에 속성을 포맷하십시오.9.14E+08로 표시된 9자리 숫자가 있었습니다.셀이 로드된 후 형식이 설정되었습니다.값을 로드하기 전에 속성을 설정하면 숫자가 원하는 대로 직선 텍스트로 표시됩니다.

또는 다음을 참조하십시오.

먼저 자동 설정을 시도해 주시겠습니까?

Excel_Obj.Columns("A:V").EntireColumn.AutoFit

이렇게 하면 형식이 텍스트로 변경됩니다.

Worksheets("Sheetname").Activate
Worksheets("SheetName").Columns(1).Select 'or Worksheets("SheetName").Range("A:A").Select
Selection.NumberFormat = "@"

과학적 표기법으로 표시되는 큰 숫자의 경우 형식을 '#'으로 설정합니다.

과학적 표기법을 방지하려면 다음과 같이 하십시오.

With Range(A:A)
    .NumberFormat = "@"
    .Value = .Formula
End With

언급URL : https://stackoverflow.com/questions/8265350/how-to-change-format-of-a-cell-to-text-using-vba 입니다.