ホーム > ライブラリ > VBE > VBE_IsSecurity

ライブラリ

VBE_IsSecurity

オプション設定[VBAへのアクセスを信頼する]の設定値を取得
※VBAでモジュール等を処理する際に必須の判定

Public Function VBE_IsSecurity(App As Application, Optional Alert As Boolean = True) As Boolean
    
    Dim Val     As Variant
    
    On Error GoTo Terminate
    Val = App.VBE.MainWindow.Visible
    
    '取得できない→オプション設定が必要
    Exit Function
Terminate:
    VBE_IsSecurity = True
    If Alert = True Then
        Call Msg_Show("オプション設定[VBAへのアクセスを信頼する]がOFFになっています" & CL2 & _
                      "以下の手順でONにしてください" & CL2 & _
                      "[ファイル]タブ → [オプション] → [セキュリティセンター] " & CL & _
                      " → [セキュリティセンターの設定] → [マクロの設定]" & CL & _
                      " → [VBA プロジェクト オブジェクト モデルへのアクセスを信頼する]にチェック" & CL)
    End If
    Err.Clear
End Function

VBE   2017/07/11   shono

この記事へのコメント

コメントを送る

 
※ メールは公開されません
Loading...
 画像の文字を入力してください