msg : l'indice n'appartient pas à la sélection sur ouverture userform

[ben]

Bonjour le forum

j'ai un souci dont je ne trouve pas la solution
QDj'ouvre un formulaire j'ai le message : l'indice n'appartient pas à la sélection
Sur le débogage il me met en jaune userform2.show 0

merci pour votre aide

 

[EMG]

Bonjour Ben , le forum

Travaille tu avec Excel 97 si oui met ce code dans dans un Module et cela doit résoudre ton problème


Sub AfficherUserForm()
Verif_VersionXL ' UserForm1.Show vbModeless
End Sub

'Constante Valeur Decription
'vbModeless 0 UserForm n'est pas modal.
'vbModal 1 UserForm est modal (valeur par défaut).

'Par défaut, chaque UserForm est Modal. Cela signifie qu'il doit
'être fermé avant de pouvoir faire autre chose. Dans Excel 2000,
'cependant, vous pouvez rendre un UserForm non Modal en écrivant
'vbModeless comme argument pour la méthode Show. Voici un exemple
'
'Détermine la version d'Excel de l'utilisateur, puis exécutez une
'Fonction séparée si la version est Excel 2000 (ou ultérieur).
'Le code suivant montre comment :
'Puisque la Fonction USFORM_VbModeless_OK n'est pas exécutée
'dans Excel 97, elle ne causera pas d'erreur de compilation.

Public Function Verif_VersionXL()
If Val(Application.Version) >= 9 Then
USFORM_VbModeless_OK
Else
UserForm1.Show
End If
End Function

Public Function USFORM_VbModeless_OK()
Dim Frm As Object
Set Frm = UserForm1
Frm.Show vbModeless
End Function

@+ Gérard

 

[ben]

je travail avec excel 2000

 

[EMG]

bien alors il ne doit pas avoir de lézard

Joint ton fichier que je regarde ce qui ne va pas

@+ Gérard

 

[ben]

je peux pas t'envoyer le fichier car pour faire un essai ma macro va chercher des fichier sur un réseau et il faut faire des extrations de logiciel qui font plusieur Mo
Merci pour ton aide qd meme je vais essayé de me creuser la tete lol

 

[EMG]

Bon quand je dis joint ton fichier que je regarde ce qui ne va pas, je ne parle seulement de ton UserForm et de la macro qui va avec évidement

 

[ben]

ca y y es eureka j'ai trouvé !!!
comme je travail sur plusieur classeur il fallait que ajouter dans l'initialisation de mon userform2 Workbooks("comparaison copics copics 06 12.xls").activate

 

[EMG]

Bien je suis content pour toi