Algunos archivos pueden contener virus

Sabe alguien cono evitar que aparezca este aviso

Sale al clic en botón para abrir un vídeo.

Este es el código que tengo puesto.

If Me.VideoSiNo = 0 Then
MsgBox " ¡LO SIENTO!" & vbCrLf & vbCrLf & " No hay enlace video", vbInformation
Else
If Nz(Me.Archivo4, "") = "" Then Exit Sub
On Error Resume Next
Application.FollowHyperlink Me.Archivo4
End If