Comment déclencher une erreur à partir d'une fonction VBA

Question

Je dois déclencher (renvoyer) un événement d'erreur d'une fonction VBA, puis la fonction d'appel de cette fonction peut déclencher On Error Go to call. Par exemple,

function Test() 
On Error Go to myError: 
     TestErr() 
Exit Function 

myerror: 
    Test = "Error Triggered" 
End Function 

Function TestErr() 
    ?? 'How to Trigger error here 
End Function 

Merci Vous

Answer 1

Err.Raise 5, "source d'erreur en option", "option description de l'erreur"

référence MSDN http://msdn.microsoft.com/en-us/library/aa164019%28office.10%29.aspx#odc_tentipsvba_topic3

Answer 2

façon sale: 1/0

Answer 3

Pas ce que vous avez demandé, mais notez que si vous voulez retourner une erreur à une cellule d'un UDF, utilisez CVErr. Comme

Test = CVErr(xlErrNA) 

retourner #NA