Garrett은 텍스트 데이터를 숫자 데이터로 빠르게 변환 할 수있는 방법이 있는지 물었습니다. 그는 쉼표 (1,256) 대신 수천 자리 (1,256)의 공백을 사용하는 텍스트 파일을 가져오고 있습니다.

이 문제에 접근하는 방법에는 여러 가지가 있습니다. 첫 번째는 문제의 원인을 이해하는 것입니다. 텍스트 파일은 미터법 표준을 따르는 시스템에서 생성되었을 수 있습니다. 미터법 표준을 따르는 일부 국가에서는 쉼표 대신 천 단위 구분 기호로 공백을 사용합니다. 따라서 Excel을 시작하고 가져 오기를 수행하기 전에 Windows에서 국가 별 설정을 변경하면 파일을 Excel로 제대로 가져올 수 있습니다. 제어판을 사용하여 지역 설정을 변경할 수 있습니다.

시스템의 지역 설정을 변경하지 않으려면 다른 방법을 사용할 수 있습니다. Excel에서 정보를 가져온 후 숫자가 포함 된 셀 범위를 선택하고 간단히 검색 및 바꾸기를 수행 할 수 있습니다. 하나의 공백을 검색하고 공백으로 대체합니다. 이것은 공간을 완전히 없애고 Excel은 셀의 내용을 숫자로 처리합니다.

원하는 경우 수식을 사용하여 가져온 데이터를 수정할 수도 있습니다. 예를 들어 가져온 숫자 (공백 포함)가 A3 셀에있는 경우 다음 공식을 사용하여 공백을 제거 할 수 있습니다.

=1*SUBSTITUTE(A3," ","")

첫 번째 따옴표 세트 사이에는 공백이 있고 두 번째 따옴표 세트 사이에는 공백이 없습니다.

변환 할 데이터가 많거나 텍스트가 “숫자 전용”셀에 산재 해있는 경우 매크로를 사용하여 변환 할 수 있습니다. 다음 매크로는 호출하기 전에 선택한 항목에 대해 작동합니다. 또한 공백을 제거한 후 셀에 숫자 값이 포함되어 있는지 확인합니다. 그렇지 않으면 변환이 수행되지 않습니다.

Sub ClearSpacesIfNumeric()

Dim c As Range 'Cell under examination     Dim tmpText As String 'Cell contents without spaces     Dim i As Integer 'Simple counter

For Each c In Selection         tmpText = "" 'Initialize

'Check each character to see if it's a space         'If it isn't, add it to tmpText         For i = 1 To Len(c.Text)

If Mid(c.Text, i, 1) <> " " Then                 tmpText = tmpText & Mid(c.Text, i, 1)

End If         Next i

'tmpText is now the cell contents without spaces         'If tmpText is a number, assign its value to         'the current cell         If IsNumeric(tmpText) Then             c.Value = tmpText         End If     Next c End Sub

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (12058)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다. 여기에서 Excel의 이전 메뉴 인터페이스에 대한이 팁 버전을 찾을 수 있습니다.

link : / excel-Converting_Imported_Information_to_Numeric_Values ​​[가져온 정보를 숫자 값으로 변환].