2023. 12. 13. 11:14, 엑셀로 풀어가는 세상
반응형
엑셀 VBA #19 / Like 연산자_예제1 [VBA]
Len(Range("a2"))
a2셀 값의 글자 개수를 알려줘!!!
Mid(Range("a2"), 1, 1)
mid함수 지정 셀 값의 왼쪽에서부터 첫번째 위치한 글자에서부터 글자 하나만 보여줘!!!
Mid(Range("a2"), 4, 4)
a2셀의 값에서 왼쪽에서 4번째부터 시작하여 4글자만 보여줘!!!
Sub Like연산자_예제()
Dim i As Long
Dim lT As String
For i = 1 To Len(Range("A2"))
If Mid(Range("a2"), i, 1) Like "[가-힣]" Then
lT = lT & Mid(Range("a2"), i, 1)
End If
Next
Range("b2") = lT
'If Len(lT) then Range("b2")=lT
'위 코드보다 이 코드 좋다는데....
'If Len(lT) then 의미 : lT에 값이 있다면!
End Sub
VBA#37강 Len구문 사용례 참고
If Len(Cells(i, "B")) Then ' Cells(i, "B")에 값이 있다면 아래 구문 반복해
https://www.youtube.com/watch?v=SumpOywJJqY&list=PLfxvqpVCYZ8e0qlyc_FU46neoWjO7yTWj&index=19
반응형
'엑셀로 풀어가는 세상' 카테고리의 다른 글
| 엑셀 VBA #25 / For Each~Next_1 [VBA] - 시트숨기기 (0) | 2023.12.13 |
|---|---|
| 엑셀 VBA #24 / For~Next_4 [VBA] - 시트 핸들링 (0) | 2023.12.13 |
| 엑셀 VBA #21 / For~Next_1 [VBA] 기본 (0) | 2023.12.13 |
| 엑셀 VBA #20 / Like 연산자_예제2 [VBA] (0) | 2023.12.13 |
| 엑셀 VBA #18 / Like 연산자 [VBA] (0) | 2023.12.13 |
| 엑셀 VBA #17 / If 조건문 [VBA] (0) | 2023.12.13 |
| 엑셀 VBA #15 / 셀 범위 선택하기_10 [VBA] - 빈 셀 채우기 (0) | 2023.12.13 |
| 엑셀 VBA #14 / 셀 범위 선택하기_9 [VBA] - Intersect 실무예제 (0) | 2023.12.13 |
Comments, Trackbacks
