텍스트 문자열에서 HTML 태그 제거하기

여러 텍스트 문자열이 HTML 태그로 둘러싸여 있는 경우, 모든 HTML 태그를 제거하려면 이 문서의 방법들이 도움이 될 수 있습니다.

• 수식을 사용하여 모든 단순한 HTML 태그 제거하기
• VBA 코드를 사용하여 일부 복잡한 HTML 태그 제거하기

수식을 사용하여 모든 단순한 HTML 태그 제거하기

텍스트 문자열이 단순한 HTML 태그로 둘러싸여 있다면, Excel의 MID 함수가 이 작업을 해결하는 데 도움이 될 수 있습니다. 일반적인 구문은 다음과 같습니다:

• string: HTML 태그를 제거하고자 하는 텍스트 문자열 또는 셀 값입니다.
• text_start: 사용하고자 하는 첫 번째 문자의 위치 번호입니다.
• tag_len: 텍스트 문자열 내에 있는 HTML 태그의 길이입니다.

다음 수식을 복사하거나 빈 셀에 입력하십시오:

그런 다음, 채우기 핸들을 아래로 드래그하여 이 수식을 적용할 셀을 선택하면, 아래 스크린샷과 같이 모든 HTML 태그가 셀에서 제거됩니다:

수식 설명:

LEN(A2)-7: 이 LEN 함수는 A2 셀의 텍스트 문자열 길이를 계산하는 데 사용되며, 7(시작 및 종료 태그 포함)을 뺀 값은 HTML 태그를 제외한 추출하려는 문자 수를 나타냅니다. 반환된 값은 MID 함수 내의 num_chars 인수로 사용됩니다.

MID(A2,4,LEN(A2)-7): 이 MID 함수는 네 번째 문자부터 시작하여 LEN 함수에서 반환된 문자 길이만큼 모든 문자를 추출합니다.

VBA 코드를 사용하여 일부 복잡한 HTML 태그 제거하기

아래 스크린샷과 같이 텍스트 문자열에 여러 개의 HTML 태그가 포함되어 있는 경우, 위의 수식이 올바르게 작동하지 않을 수 있습니다. 이 경우, 다음 VBA 코드는 텍스트 문자열의 복잡한 HTML 태그를 처리하는 데 도움이 됩니다.

1. Excel에서 Alt + F11 키를 누르면 Microsoft Visual Basic for Applications 창이 열립니다.

2. 삽입 > 모듈을 클릭하고, 모듈 창에 다음 VBA 코드를 붙여넣습니다.

Sub RemoveTags()
'updateby Extendoffice 
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select data range", "Kutools for Excel", xAddress, , , , , 8)
    Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    xRg.NumberFormat = "@"
    With CreateObject("vbscript.regexp")
        .Pattern = "\<.*?\>"
        .Global = True
        For Each xCell In xRg
            xCell.Value = .Replace(xCell.Value, "")
        Next
    End With
End Sub

3. 그런 다음, F5 키를 눌러 이 코드를 실행하면, 프롬프트 상자가 나타나며 HTML 태그를 제거하려는 셀을 선택하십시오. 아래 스크린샷 참조:

4. 확인 버튼을 클릭하면, 선택한 셀에서 모든 HTML 태그가 제거됩니다. 아래 스크린샷 참조:

관련 기능:

추가 자료: