vba - VBA - Microsoftスクリプトの実行時間を自動チェック/チェック解除

Question

Microsoft Script Runtime参照リストに参照を自動追加する次の関数がありました。ただし、ユーザーがすでに を含めている場合は、Microsoft script runtimeエラーが表示されますName conflicts with existing module,project, object library。

Microsoft script runtime参照に含まれていない場合は自動追加し、既に追加されている場合は何もしない条件を設定するにはどうすればよいですか?

Private Function AddScriptingLibrary() As Boolean

Const GUID As String = "{420B2830-E718-11CF-893D-00A0C9054228}"

On Error GoTo errHandler
ThisWorkbook.VBProject.References.AddFromGuid GUID, 1, 0
AddScriptingLibrary = True
Exit Function
errHandler:
MsgBox Err.Description

End Function