안녕하세요? 그냥 VBA의 LEFT 와 MID 함수를 사용하시면 됩니다.
Sub test()
Dim strX As String
strX = "엑사전"
Dim 레프트 As String
Dim 미드 As String
레프트 = Left(strX, 1)
미드 = Mid(strX, 2, 2)
MsgBox 레프트
MsgBox 미드
End Sub
다음검색
안녕하세요? 그냥 VBA의 LEFT 와 MID 함수를 사용하시면 됩니다.
Sub test()
Dim strX As String
strX = "엑사전"
Dim 레프트 As String
Dim 미드 As String
레프트 = Left(strX, 1)
미드 = Mid(strX, 2, 2)
MsgBox 레프트
MsgBox 미드
End Sub