Excel에서 가장 편리한 기능 중 하나는 지정한 기준에 따라 셀 내용을 개별 셀로 쉽게 분할 할 수있는 텍스트-열 기능입니다. 이 기능을 사용하는 한 가지 방법은 셀 내의 문자를 인식하고 해당 문자를 사용하여 분할이 발생해야하는 위치를 트리거하는 것입니다. 이러한 유형의 분할을 delimited split이라고합니다.

작성중인 매크로에서 구분 된 텍스트-열 작업을 수행하는 방법이 궁금 할 수 있습니다. 설정 한 선택 항목에서 TextToColumns 메서드를 사용하면 쉽게 수행 할 수 있습니다. 다음의 매우 간단한 매크로를 고려하십시오.

Sub ExampleSplit1()

Selection.TextToColumns _       Destination:=Range("A2"), _       DataType:=xlDelimited, _       TextQualifier:=xlDoubleQuote, _       ConsecutiveDelimiter:=False, _       Tab:=True, _       Semicolon:=False, _       Comma:=False, _       Space:=False, _       Other:=True, _       OtherChar:="-"

End Sub

TextToColumns 메서드에 대해 설정할 수있는 모든 변수를 확인합니다.

이러한 변수의 대부분은 구분 된 분할이기 때문에 필요합니다. 변수는 메소드에서 구분 기호로 사용되는 것을 설정합니다.

탭 줄부터 변수는 텍스트를 열로 변환 마법사의 2 단계에서 수동으로 기능을 사용하는 경우 설정 한 설정과 직접 일치합니다. 해당 문자를 구분 기호로 사용할 것인지 여부에 따라 탭, 세미콜론, 쉼표 및 공백을 True 또는 False로 설정할 수 있습니다.

“사용자 정의”구분 기호를 사용할지 여부에 따라 기타 변수를 True 또는 False로 설정할 수도 있습니다. True로 설정하면 구분 기호로 사용할 문자와 같은 OtherChar 변수를 설정해야합니다.

동일한 매크로에서 TextToColumns 메서드를 여러 번 사용하는 경우 첫 번째 호출 이후에 수행해야하는 유일한 작업은 이전 호출과 다른 변수를 변경하는 것입니다. 예를 들어, 동일한 매크로에서 메서드를 두 번 호출하고 처음에는 대시 문자의 인스턴스에 분할을 원하지만 두 번째에는 소문자 x의 인스턴스에 해당 메서드를 호출한다고 가정 해 보겠습니다. . 다음과 같이 매크로를 조합 할 수 있습니다.

Sub ExampleSplit2()

Dim objRange1 As Range     Dim objRange2 As Range

'Set up the ranges     Set objRange1 = Range("A2:A20")

Set objRange2 = Range("A21:A35")



'Do the first parse     objRange1.TextToColumns _       Destination:=Range("A2"), _       DataType:=xlDelimited, _       Tab:=False, _       Semicolon:=False, _       Comma:=False, _       Space:=False, _       Other:=True, _       OtherChar:="-"



'Do the second parse     objRange2.TextToColumns _       Destination:=Range("A21"), _       DataType:=xlDelimited, _       OtherChar:="x"

End Sub

_ 참고 : _

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

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

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

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

link : / excel-Delimited_Text-to-Columns_in_a_Macro [Delimited Text-to-Columns in a Macro].