Erreur d'execution 13

B

Banzai64

XLDnaute Accro

• 16 Novembre 2010

• #2

Re : Erreur d'execution 13

Bonjour

Faut que je réfléchisse avant ..... Grrrr

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 16 Novembre 2010

• #3

Re : Erreur d'execution 13

Bonjour kero 67

Il nous en faudrait plus
L'erreur peut très bien se situer dans le Userform1_Initialyze
Essaie de poster une copie de ton fichier ne conservant que l'essentiel du problème

Bing Salut Banzai

 

Vote positif 0 Vote négatif

B

Banzai64

XLDnaute Accro

• 16 Novembre 2010

• #4

Re : Erreur d'execution 13

bonjour pierrejean

Souvent ce que j'avais marqué c'était quand l'erreur était sur Userform1.Show mais pas sur Load Userform1

Pour cette raison que j'ai enlevé mon message

 

Vote positif 0 Vote négatif

K

kero_67

Guest

• 16 Novembre 2010

• #5

Re : Erreur d'execution 13

Bonjour,

J'ai supprimé beaucoup de choses du fichier (des modules, un USF) j'espère que ce qui reste permettra quand même la compréhension 😱.

 

Pièces jointes

• PLAN_DE_CHARGE_web.zip

  47.9 KB · Affichages: 30

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 16 Novembre 2010

• #6

Re : Erreur d'execution 13

Re

En l'etat , je te suggere cette modification dans Userform1_initialize

VB:

.....
If .Cells(65536, 2).End(xlUp).Row > 1 Then
Ligne = .Cells(65536, 2).End(xlUp).Row
.....

Avec une reflexion sur la definition de Ligne

 

Vote positif 0 Vote négatif

K

kero_67

Guest

• 16 Novembre 2010

• #7

Re : Erreur d'execution 13

Merci beaucoup PierreJean !
Ce problème est résolu 😉 maintenant je vais travailler sur le reste 😛

Bonne après-midi

 

Vote positif 0 Vote négatif