lever une erreur

lever une erreur - VB/VBA/VBS - Programmation

Marsh Posté le 14-06-2006 à 14:48:43    

salut a tous,
 
je cherche a attribuer une valeur a ma variable si celle ci juste avant etait en Erreur !
(le code parlera plus)
 
Range("d6" ) est un celle en format DATE si elle est vide, il y a "#N/A", donc ca me cree une erreur ! donc j'aimerai pouvoir affecter a DATERDV qqc au lieu de l'erreur
 

Spoiler :


If Range("d6" ) = Error(13) Then
    daterdv = ""
    Else
    daterdv = Format(Range("D6" ), "ddmmyyyy" )
End If


 
merci

Reply

Marsh Posté le 14-06-2006 à 14:48:43   

Reply

Marsh Posté le 14-06-2006 à 17:42:56    

Utilise la fonction IsError()
If IsError(Range("d6" )) ...
Ça devrait marcher

Reply

Marsh Posté le 15-06-2006 à 23:13:02    

Merci ;)  :p  :p  :D

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed