Discussion :

[Tikalins]

Bonjour,

J'ai pour code dans mon module 1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Sub NouvRef()
 init
 dernier = False
 While Not dernier
  Satisf = False
  UF_NouvRef.Show
  If Satisf Then
   LStock = prlv(ShStock, 2)
   ShStock.Cells(LStock, KRef).Value = Ref
   ShStock.Cells(LStock, KDes).Value = Des
   ShStock.Cells(LStock, KThick).Value = Thick
   ShStock.Cells(LStock, KLgth).Value = Lgth
   ShStock.Cells(LStock, KWdth).Value = Wdth
   ShStock.Cells(LStock, KSt).Value = Stock
   ShStock.Cells(LStock, KStal).Value = Stal
   ShStock.Cells(LStock, KDm).Value = Delmoy
   ShStock.Cells(LStock, KQhc).Value = Qhc
  End If
 Wend
 WkStock.Save
End Sub

UF_NouvRef.Show appelle l'UserForm du même nom. Pourtant lorsque j'exécute la macro j'ai une erreur 1004 "erreur définie par l'application ou par l'objet". Je ne comprends pas pourquoi. Pourriez-vous m'aider s'il vous plaît?

Je vous remercie d'avance

[joe.levrai]

Bonjour,

si c'est la ligne 6 qui plante, met un point d'arrêt sur la première ligne de code de ta procédure Initialize du userform
et lance ta procédure du module 1 en mode pas à pas

ça te permettra de visualiser la ligne qui pose problème dans ton Initialize


c'est bien souvent ce qui arrive quand on a ce type d'erreur dans une procédure qui fait appel à un userform : le débogage reste sur la ligne appelante du userform (ta ligne 6)



si tu n'arrives pas à débugger seul :

- nous montrer la procédure initialize
- nous indiquer la ligne qui a planté dedans