Excel VBA ThisWorkbook Close Stoped Working

Question

ユーザーフォーム上のボタンをクリックしたときにThisWorkbook.Closeが機能しなくなった理由について興味があります。今、私は1004エラー

Closeメソッドを受け取るか、ワークブックオブジェクトワークブックの

前のバックアップは大丈夫ですし、エラーなしで閉鎖に失敗しました。イベントは無効にされていません。このWorkbook.SaveまたはApplication.Quitは正常に動作します。

Ctrl-Alt-Delを使用してExcelを終了してワークブックを終了する必要がありますか？

アイデア？

Private Sub cmbClose_Click() 

On Error GoTo errHandler: 

' Close workbook 
ThisWorkbook.Close 

' Error handler 
On Error GoTo 0 
Exit Sub 

errHandler:: 
    MsgBox "An Error has Occured " & vbCrLf & "The error number is : " _ 
    & Err.Number & vbCrLf & Err.Description & vbCrLf & vbCrLf & _ 
    "Please take a screenshot of this message and contact the developer " 

End Sub 

Answer 1

私の推測ではありますが、閉じる前にブックを保存しましたか？私は

ThisWorkbook.Close False 

に

ThisWorkbook.Close 

を変更し、それがサブとして完璧に動作します。 （ "False"はプロパティ "SaveChanges"のため、私は新しく作成されたワークブックでこれをテストしていたcozの保存を促さずに閉じるようにしています）