Note: The other languages of the website are Google-translated. Back to English

Excel에서 조건에 따라 셀 내용을 지우는 방법은 무엇입니까?

때로는 셀에 특정 값이 포함된 경우 셀 내용 지우기, 다른 열에 빈 셀이 있는 경우 셀 내용 지우기, 특정 배경색이 있는 셀 내용 지우기 등과 같은 Excel의 조건에 따라 셀 내용을 지워야 할 수도 있습니다. 이 기사에서는 이러한 작업을 빠르고 쉽게 해결할 수 있는 몇 가지 트릭을 소개합니다.

VBA 코드가 있는 셀 값을 기반으로 셀 내용 지우기

값이 VBA 코드로 특정 값보다 크거나 작으면 전체 행 지우기

편리한 기능으로 셀 값을 기반으로 셀 또는 행 내용 지우기

VBA 코드로 다른 셀이 비어 있으면 전체 행 지우기

VBA 코드로 배경색을 기반으로 셀 내용 지우기


VBA 코드가 있는 셀 값을 기반으로 셀 내용 지우기

예를 들어, 다음 데이터 범위가 있고 이제 "Hoodie"인 셀 내용을 지우려면 아래 VBA 코드가 도움이 될 수 있습니다.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여 넣습니다.

VBA 코드: 셀이 특정 값과 같으면 셀 내용 지우기

Sub ClearContents()
'Updateby ExtendOffice
 Dim xRng As Range
 Dim xCell As Range
 Dim xText As String
 Set xRng = Application.Range("A2:A12")
 xText = "Hoodie" 'Change this text to your own
 For Each xCell In xRng
 If xCell.Value = xText Then
 xCell.clearContents
 End If
 Next xCell
End Sub
주의 사항: 위 코드에서 A2 : A12 셀 내용을 지우려는 데이터 범위, 텍스트 "후드티"는 지우려는 특정 값입니다. 자신의 것으로 변경하십시오.

3. 그런 다음, F5 키를 눌러 이 코드를 실행하면 "Hoodie"라는 텍스트가 있는 모든 셀이 한 번에 지워집니다. 스크린샷 참조:


값이 VBA 코드로 특정 값보다 크거나 작으면 전체 행 지우기

D 열의 값이 300보다 크거나 작으면 전체 행 내용을 지우기 위해 아래 데이터 범위가 있다고 가정합니다. 여기에서 VBA 코드를 만들어 완료합니다.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여 넣습니다.

VBA 코드: 셀 값이 특정 값보다 크거나 작으면 전체 행 지우기

Sub ClearRowInValue()
'Updateby ExtendOffice
Dim xRg As Range
Dim xStrAddress As String
Dim xStrValue As Integer
Dim xCell As Range
Dim xRowRg As Range
Dim xF As Integer
Dim xBol As Boolean
xStrAddress = "D2:D12" 'Change cell range
xStrValue = 300 'change the value
Set xRg = Range(xStrAddress)
For xF = xRg.Rows.Count To 1 Step -1
    Set xRowRg = xRg.Rows.Item(xF)
    xBol = False
    For Each xCell In xRowRg.Cells
        If Application.IsNumber(xCell.Value) Then
        If xCell.Value > xStrValue Then
        xBol = True
        Exit For
        End If
        End If
    Next
    If xBol Then
        xRowRg.EntireRow.clearContents
    End If
Next
End Sub
주의 사항: 위 코드에서 D2 : D12 데이터 범위에 행을 지울 특정 값이 포함되어 있습니까? 300 특정 값입니다. 그만큼 > 스크립트 내의 문자 xCell.Value > xStrValue이면 보다 큼, 보다 작게 사용, 다음으로 변경 < 당신이 필요로하는 문자.

3. 그런 다음 F5 키를 눌러 이 코드를 실행하고 D 열의 값이 300보다 크면 모든 행 내용이 지워집니다. 스크린샷 참조:


편리한 기능으로 셀 값을 기반으로 셀 또는 행 내용 지우기

당신이 있으면 Excel 용 Kutools그와 특정 셀 선택 기능을 사용하면 특정 값을 기준으로 셀 또는 행을 선택하고 셀 내용을 한 번에 삭제할 수 있습니다.

설치 후 Excel 용 Kutools, 다음과 같이하십시오.

1. 셀 또는 행 내용을 지울 값이 있는 데이터 범위를 선택한 다음 쿠툴 > > 특정 셀 선택, 스크린 샷 참조 :

2. 열린 특정 셀 선택 대화 상자에서 다음 작업을 수행하십시오.

  • . 세포 or 전체 행 선택하고 싶은 것;
  • 아래에 기준을 지정하십시오. 특정 유형 필요에 따라 섹션. 여기서 D열의 값이 300보다 큰 행을 선택하고 싶습니다.

3. 그런 다음 Ok 버튼을 누르면 값이 300보다 큰 모든 행이 선택됩니다. 이제 키보드에서 Delete 키를 눌러 셀 내용을 삭제하면 됩니다. 스크린샷을 참조하십시오.

방문 꿀팁: 사용할 수 있는 다른 기준이 많이 있습니다. 아래 스크린샷과 같이 대화 상자에서 자신의 조건을 지정하십시오.

VBA 코드가 있는 빈 셀이 포함된 경우 범위의 행 데이터 지우기

이 경우 데이터 범위의 셀에 공백이 있으면 아래 스크린샷과 같이 범위에서 행 데이터를 지우고 싶습니다.

이 작업을 완료하려면 다음 VBA 코드를 적용하십시오.

1. 누르고있어. ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈, 다음 코드를 붙여넣습니다. 모듈 창문.

VBA 코드: 빈 셀이 포함된 경우 행 데이터 지우기

Sub ClearContents()
'Updateby ExtendOffice
Dim xcell As Range
Set xrng = Application.Range("A2:D12")
For Each xcell In xrng
If xcell.Value = "" Then
Intersect(xcell.EntireRow, xrng).ClearContents
End If
Next
End Sub
주의 사항: 위 코드에서 A2 : D12 데이터 범위에 셀 내용을 지우려는 빈 셀이 포함되어 있습니다.

3. 그런 다음, F5 키를 눌러 이 코드를 실행하고 빈 셀이 있는 행 데이터는 필요에 따라 특정 범위에서 한 번에 지워집니다.


VBA 코드로 배경색을 기반으로 셀 내용 지우기

특정 배경색으로 채워진 셀을 지우려면 다음 VBA 코드를 사용할 수 있습니다.

1. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

2. 딸깍 하는 소리 끼워 넣다 > 모듈, 다음 코드를 붙여넣습니다. 모듈 창문.

VBA 코드: 배경색에 따라 셀 내용 지우기

Sub Clearcontents()
'Updateby ExtendOffice
Dim xcell As Range
Dim xrng As Range
Set xrng = Application.Range("A2:D12")
    For Each xcell In xrng
        If xcell.Interior.Color = RGB(252, 228, 214) Then
            xcell.Clearcontents
        End If
    Next
End Sub
주의 사항: 위 코드에서 A2 : D12 사용하려는 데이터 범위입니다. RGB (252, 228, 214) 셀을 지우려는 특정 색상은 다음을 사용하여 배경 색상의 RGB 모드를 추출할 수 있습니다. 페인트 컴퓨터의 프로그램.

3. 그런 다음 F5 키를 눌러 이 코드를 실행하면 지정된 배경색의 셀 내용이 즉시 지워집니다. 스크린샷 참조:



  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 및 데이터 보관; 셀 내용 분할; 중복 행과 합계 / 평균 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 즐겨 찾기 및 빠른 수식 삽입, 범위, 차트 및 그림; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 피벗 테이블 그룹화 기준 주 번호, 요일 등 ... 잠금 해제되고 잠긴 셀 표시 다른 색상으로; 수식 / 이름이있는 셀 강조 표시...
kte 탭 201905
  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50 % 향상시키고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (0)
아직 평가가 없습니다. 가장 먼저 평가하세요!
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치