fix: 入力チェックの名前付き範囲を「物件状況」から正しい「選択状況」に修正

Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
Kenichiro NOGI 2026-09-18 18:34:10 +09:00
parent 51e1e166d4
commit 413de865f0

View File

@ -24,7 +24,7 @@ Sub run()
'入力チェック(営業所・物件状況が未選択なら処理中断)
Dim selSalesOffice As Variant, selPropertyStatus As Variant
selSalesOffice = Range("選択営業所").Cells(1, 1).Value
selPropertyStatus = Range("•¨ŚŹŹó‹µ").Cells(1, 1).Value
selPropertyStatus = Range("Ið<EFBFBD>ó‹µ").Cells(1, 1).Value
If IsError(selSalesOffice) Then selSalesOffice = ""
If IsError(selPropertyStatus) Then selPropertyStatus = ""