Bonjour,
 
Dans le sub qui suis, je constate que lorsque je place une valeur dans un range, err.number = 9
si je la place dans toto err.number = 0
Je constate aussi que , n'ayant pas "on error resume next", le err.number = 9 n'est pas considéré comme une erreur!!! puisque le sub ne plante pas.
 
Avez-vous le même phénomène???
 
Sub test_numer()
Err.Number = 0
 
 
Sheets("feuil1" ).Range("A1" ) = Sheets("feuil1" ).Range("A2" )
MsgBox Err.Number
 
Err.Number = 0
 
toto = Sheets("feuil1" ).Range("A2" )
MsgBox Err.Number
 
toto = "vis"
Sheets("feuil1" ).Range("A1" ) = toto
MsgBox Err.Number
 
End Sub
 
 
 
 
Cordialement

Je n'ai pas 2007 ici pour tester mais uilise plutôt Err.Clear au lieu de Err.Number = 0. Ca ne résoudra pas le problème mais c'est plus propre.

Bonjour, tu as tout à fait raison, Deamon, d'ailleurs j'avais déja un peu corrigé dans ce post:
 
http://forum.hardware.fr/hfr/Progr [...] m#t1917633
 
Pour le test, est-ce qu'il est correct avec une autre version??
Cordialement

Sous Excel 2003 j'ai toujours 0 pour l'erreur.

Merci