Excel의 Visual Basic for Applications 왼쪽, 오른쪽, 중간 및 len 함수 사용

요약

이 문서에는 Microsoft Excel의 Microsoft Visual Basic for Applications 왼쪽, 오른쪽, 중간 및 Len 함수를 사용하여 텍스트 문자열을 조작하는 방법에 대한 예제가 포함되어 있습니다.

추가 정보

Microsoft에서 제공하는 프로그래밍 예제는 예시를 위한 것일 뿐이며 이와 관련하여 명시적이거나 묵시적인 어떠한 보증도 하지 않습니다. 이는 상품성이나 특정 목적에 대한 적합성의 묵시적인 보증을 포함하며 이에 제한되지 않습니다. 이 문서에서는 예제에 사용되고 있는 프로그래밍 언어와 프로시저를 만들고 디버깅하는 데 사용되는 도구를 사용자가 잘 알고 있는 것으로 가정합니다. Microsoft 지원 엔지니어가 특정 프로시저의 기능을 설명하여 도움을 줄 수 있습니다. 사용자의 특정 요구 사항에 맞도록 예제를 수정하여 추가 기능을 제공하거나 프로시저를 구성하지는 않습니다.

다음 절차에서는 Microsoft Excel에서 Microsoft Visual Basic for Applications 왼쪽, 오른쪽, 중간 및 Len 함수를 사용하는 방법을 보여 줍니다.

1. 비어 있는 새 Excel 통합 문서를 만듭니다.

2. Alt+F11을 눌러 Visual Basic 편집기 엽니다.

3. [삽입] 메뉴에서 [모듈]을 클릭합니다.

4. 새 모듈 시트에 다음 매크로를 입력합니다.

         Sub String_Len()
             ' Sets MyString.
             MyString = InputBox("Enter some text.")
             ' Displays length of string.
             MsgBox Prompt:="The length of the string is " & _
                 Len(MyString) & " characters."
         End Sub
   
         Sub String_Left()
             ' Sets MyString.
             MyString = InputBox("Enter some text.")
             StringLen = Len(MyString)
             Pos = InputBox("Please enter a number from 1 to " & StringLen)
             ' Takes the left number of specified characters.
             Result = Left(MyString, Pos)
             ' Displays the result.
             MsgBox Prompt:="The left " & Pos & " characters of """ & _
                 MyString & """ are: " & _
                 Chr(13) & Result
         End Sub
   
         Sub String_Right()
             ' Sets MyString.
             MyString = InputBox("Enter some text.")
             StringLen = Len(MyString)
             Pos = InputBox("Please enter a number from 1 to " & StringLen)
             ' Takes the right number of specified digits.
             Result = Right(MyString, Pos)
             ' Displays the result.
             MsgBox Prompt:="The right " & Pos & " characters of """ & _
                 MyString & """ are: " & _
                 Chr(13) & Result
         End Sub
   
         Sub String_Mid()
             ' Sets MyString.
             MyString = InputBox("Enter some text.")
             ' Sets starting position.
             StartPos = InputBox _
                 ("Give me a starting position (1 to " _
                 & Len(MyString) & ")")
             ' Determines length of string of text.
             StringLen = Len(MyString) - StartPos + 1
             ' Sets number of characters.
             NumChars = InputBox _
                 ("How many characters would you like? (From 1 to " & _
                 StringLen & ")")
             MsgBox prompt:="The result is: " & _
                 Mid(MyString, StartPos, NumChars)
         End Sub
   
   

왼쪽, 오른쪽, 중간 및 Len 함수의 예를 보려면 실행 중인 Excel 버전에 적합한 다음 절차 중 하나를 사용합니다.

• Microsoft Office Excel 2007에서 개발자 탭을 클릭하고 코드 그룹에서 매크로를 클릭하고 원하는 함수에 대한 매크로를 선택한 다음 실행을 클릭합니다.
• Microsoft Office Excel 2003 및 이전 버전의 Excel에서 도구 메뉴에서 매크로를 클릭하고 원하는 함수에 대한 매크로를 선택한 다음 실행을 클릭합니다.

참조

이러한 함수에 대한 자세한 내용은 모듈 시트에 다음 텍스트를 입력합니다.

• Len 함수
• Right
• 왼쪽
• 중간

자세한 정보를 원하는 함수를 강조 표시한 다음 F1 키를 누릅니다.