Excel에서 비어 있지 않은 셀을 특정 값으로 바꾸는 방법은 무엇입니까?

Excel에서는 Ctrl + Enter 키를 눌러 선택 영역을 특정 값으로 빠르고 쉽게 바꾸거나 채울 수 있습니다. 하지만, 빈 셀과 값이 있는 셀을 모두 포함하는 선택된 범위에서 비어 있지 않은 셀만 특정 값으로 바꾸는 방법을 알고 있습니까?

찾기 및 바꾸기 기능을 사용하여 비어 있지 않은 셀을 특정 값으로 바꾸기

VBA 코드를 사용하여 비어 있지 않은 셀을 특정 값으로 바꾸기

찾기 및 바꾸기 기능을 사용하여 비어 있지 않은 셀을 특정 값으로 바꾸기

Excel에서 찾기 및 바꾸기 기능은 모든 비어 있지 않은 셀을 찾아 원하는 특정 값으로 바꾸는 데 도움이 될 수 있습니다.

1. 값이 있는 셀만 바꾸고자 하는 데이터 범위를 선택합니다.

2. 그리고 나서 Ctrl + H를 눌러 찾기 및 바꾸기 대화 상자를 엽니다. 찾기 및 바꾸기 대화 상자에서 바꾸기 탭 아래에 있는 찾을 내용 필드에 *를 입력하고 바꿀 내용 텍스트 상자에 필요한 값을 입력합니다. 스크린샷을 참조하세요:

3. 그런 다음 모두 바꾸기 버튼을 클릭하면 교체될 셀의 개수를 알려주는 대화 상자가 나타납니다. 대화 상자를 닫으면 선택한 범위의 모든 값이 지정한 데이터로 교체됩니다. 스크린샷을 참조하세요:

VBA 코드를 사용하여 비어 있지 않은 셀을 특정 값으로 바꾸기

다음 VBA 코드를 사용하면 모든 데이터 셀을 한 번에 원하는 값으로 바꿀 수도 있습니다. 이렇게 하세요:

1. ALT + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

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

VBA 코드: 비어 있지 않은 셀을 특정 값으로 바꾸기

Sub ReplaceNumbers()
'Update 20141111
    Dim SRg As Range
    Dim Rg As Range
    Dim Str As Variant
    On Error Resume Next
    Set SRg = Application.Selection
    Set SRg = Application.InputBox("select range:", "Kutools for Excel", SRg.Address, , , , , 8)
    If Err <> 0 Then Exit Sub
    Str = Application.InputBox("replace with:", "Kutools for Excel", Str)
    If Str = False Then Exit Sub
    For Each Rg In SRg
        If Rg <> "" Then Rg = Str
    Next
End Sub

3. 그런 다음 이 코드를 실행하기 위해 F5 키를 누릅니다. 그러면 데이터를 바꾸고자 하는 범위를 선택하라는 메시지 상자가 나타납니다. 스크린샷을 참조하세요:

4. 확인을 클릭하고 다음 메시지 상자에 특정 값을 입력합니다. 스크린샷을 참조하세요:

5. 그리고 확인을 클릭하면 선택한 범위의 모든 값이 즉시 특정 데이터로 교체됩니다.