본문 바로가기

728x90

나누기

(2)
엑셀 셀에 있는 문장 단어로 여러 셀에 나누기, 여러 셀에 있는 단어들 한 셀에 문장으로 합치기(문자열 나누기, 합치기) 엑셀을 사용하다 보면 셀에 있는 문자열을 나누거나 합치는 것이 필요 할 때가 있습니다. 그 때 사용 할 수 있는 매크로로 txtSplit 과 txtJoin 라고 명명한 함수를 소개하겠습니다. ​간만에 윤동주 님의 아름다운 시, 윤동주님의 서시를 감상해보겠습니다! 문장을 단어로 나누기 '서시' 한 문장이 각 셀마다 아래와 같이 들어 있다고 하면, txtSplit 함수를 실행하면 문장을 공백(스페이스)로 구분하여 각각의 셀에 입력 됩니다. [사용법] 셀 선택 후 txtSplit 매크로 실행 Sub txtSplit() ' 문자열을 공백(Space)로 분할. ' 선택한(액티브 된) 셀. Dim strings As Variant ' 문자열을 배열로 지정 Dim c As Integer ' 문자열의 카운터 '빈셀이 ..
엑셀 문자열을 공백, 콤마, 따옴표로 분할하는 매크로(문자열 분할, 콤마, 스페이스, 따옴표) 엑셀로 작업을 하다보면 셀에 있는 문자열을 구분해서 분리 해야 할 때가 있습니다. 보통 공백이나, 콤마, 따옴표 등의 문자로 구분된 문자열을 각각의 셀로 이동시켜 작업해야 하는 경우 유용한 매크로 입니다. Sub SplitColumnData() Dim LastPopulatedRow As Long, MyString As String Dim StringPart() As String, ColIndex As Long Dim MinArrSubscript As Integer, MaxArrSubscript As Integer LastPopulatedRow = Cells(Rows.Count, 1).End(xlUp).Row 'Loop through each populated ce..

728x90
반응형