Traitement d'une erreur dans VBA

[bixente57]

Bonjour,

Je lis une valeur d'un tableau croisé dynamique dans une macro. La valeur lue est une date.

La fonction GetPivotData renvoie une erreur si la valeur recherchée est du type !div0

Je veux traiter cette erreur comme suit:

                    On Error GoTo Err
                    temp_h = tcd.GetPivotData(colItm.Name, rwFld.Name, rwItm.Name).Value
                    .Cells(ligne, colonne).Value = CLng(60 * Hour(temp_h) + Minute(temp_h))
Err:

Cependant, la macro plante toujours; alors que si je remplace le "On Error GoTo Err" par un "On Error Resume Next", tout marche bien.

Qu'est ce qui fait la différence dans le traitement de l'erreur?


Merci bien,

Vincent

 

[Pierrot93]

Re : Traitement d'une erreur dans VBA

Bonsoir Vincent

si je ne me trompe, "Err" est déjà un objet vba, remplace le peut être par "monerreur".

Quand à la 2ème ligne de code, "on error resume next", c'est une instruction qui signifie d'ignorer les erreurs et de traiter la ligne de code suivante.

bonne soirée
@+