[VBA 매크로] 모든 Cell 에서 맨 마지막 한 칸을 제거하는 구문 ... 주로 줄바꿈(vbCrLf)을 제거


[VBA 매크로] 모든 Cell 에서 맨 마지막 한 칸을 제거하는 구문 ... 주로 줄바꿈(vbCrLf)을 제거

오늘은 엑셀의 모든 Cell 에서 마지막 한 칸을 제거하는 구문을 공부해 보자. 우리가 반복해서 루핑을 통해 여러 곳의 문장을 하나로 합치다 보면 마지막 줄 바뀜이 문제가 된다. 손으로 제거하면 시간이 너무 오래 걸리고 짜증이 난다. VBA에서 문자열의 맨 마지막 한 글자를 제거하고 싶으면, Left 함수나 Mid 함수를 사용할 수 있어요. 문자열의 길이를 구한 다음, 맨 마지막 한 글자를 제외한 나머지 부분을 반환하면 되는 거죠. Sub 셀_값_결합() Dim ws As Worksheet Dim 결합된_값 As String Dim i As Integer For j = 6 To 80 결합된_값 = "" For i = 1 To 6 ' 첫 번째 시트부터 일곱 번째 시트까지 Set ws = ThisWorkbook.Sheets(i) If ws.Cells(j, 14).Value <> "" Then 결합된_값 = 결합된_값 & ws.Cells(j, 14).Value & "[" & ws.Name...



원문링크 : [VBA 매크로] 모든 Cell 에서 맨 마지막 한 칸을 제거하는 구문 ... 주로 줄바꿈(vbCrLf)을 제거