특정 셀이 비어 있는 경우 Excel에서 저장을 방지하려면 어떻게 해야 하나요?

Excel에서 양식을 만들고 동료들과 공유했다고 상상해 보세요. 정보를 입력한 사람을 식별하기 위해 특정 셀에 이름을 입력하도록 하려고 합니다. 해당 셀이 비어 있으면 양식의 저장을 방지하고 싶습니다. 이 튜토리얼에서는 지정된 셀이 비어 있을 때 저장 프로세스를 차단하는 데 VBA 매크로를 사용하는 방법을 보여드리겠습니다.

---

특정 셀이 비어 있는 경우 Excel에서 저장 방지

특정 셀이 비어 있는 경우 현재 워크북의 저장을 방지하려면, 다음 VBA 매크로를 쉽게 적용할 수 있습니다.

1단계: Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2단계: 프로젝트 탐색기에서 VBAProject (당신의 워크북 이름.xlsm)와 Microsoft Excel Objects를 확장하고 ThisWorkbook을 더블 클릭합니다. 스크린샷 보기:

3단계: 열리는 ThisWorkbook 창에 다음 VBA 매크로를 붙여넣습니다.

VBA 매크로: 특정 셀이 비어 있는 경우 저장 방지

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Update by ExtendOffice 20220907
Dim xFileName As String
Dim xStr As String
Dim xStrWSH As String
Dim xWSh As Worksheet
Dim xWShs As Sheets
Dim xWSh1 As Worksheet
Dim xWB As Workbook

xStrWSH = "xHidWSH_LJY"
On Error Resume Next
Set xWB = Application.ActiveWorkbook
Set xWShs = xWB.Worksheets
Set xWSh = xWShs.Item(xStrWSH)

If xWSh Is Nothing Then

  Set xWSh1 = xWShs.Add
  xWSh1.Name = xStrWSH
  xWSh1.Visible = xlSheetVeryHidden
  Cancel = False

Else

  If Trim(Application.Sheets("Sheet1").Range("A1").Value) = "" Then
  Cancel = True
  MsgBox "Save cancelled"
  End If

End If

End Sub

참고:
1. 위 VBA 코드의 26번째 줄에서 "Sheet1" 은 특정 워크시트 이름이고, "A1"은 특정 셀입니다. 필요에 따라 변경할 수 있습니다.
2. VBA를 ThisWorkbook에 입력한 후에는 먼저 워크북을 저장해야 합니다. 그런 다음 매크로가 활성화된 파일을 다른 사람에게 보낼 수 있습니다.

이제 특정 셀이 현재 워크북에서 비어 있는 경우, 저장하면 경고 대화 상자가 나타나며 "저장 취소됨"이라고 알려줍니다. 다음 스크린샷을 참조하세요:

---

관련 기사