質問: true else msgbox "エクセル閉じます", vbinformation end if end if end sub
回答: countaは空白で無いセル個数をカウントする。 空白と言うのが曲者で空白キーを使って空白文字を入れたセルが"空白セル"です。 何も入って無いnullでは無いです。 つまり何も入って無いnullもカウントする。 だからnullセル以外をカウントする様にします。 countaじゃ無く、countifを使う。