Problème d'absence de sélection.
Résolu
TitiPointCom67
Messages postés
38
Date d'inscription
Statut
Membre
Dernière intervention
-
Utilisateur anonyme -
Utilisateur anonyme -
5 réponses
Bonsoir
Peut être en testant en début de sub, si la sélection est valide
Peut être en testant en début de sub, si la sélection est valide
Private Sub CommandButton1_Click() If ListBox1.ListIndex = -1 Then Exit sub End if Erase TInfos For i = 0 To 20 TInfos(i) = ListBox1.List(Me.ListBox1.ListIndex, i) Next i Flg_TI = True UserForm6.Hide UserForm5.Show 1 End Sub
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
sans doute, si tu indiques quelle erreur.
Le message est :
Erreur d'exécution 381
Impossible de lire la propriété List. Index de table de propriété non valide.
Erreur d'exécution 381
Impossible de lire la propriété List. Index de table de propriété non valide.
EN fait, l'UserForm affiche tout simplement la deuxième ligne (la première étant pour les titres) du tableau qui se trouve sur la feuille qui s’appelle INSCRIPTIONS_17-18.
Cette ligne comprend 20 colonnes. Chaque cellule de la ligne remplie un TextBox sur l'UserForm5.
Cette ligne comprend 20 colonnes. Chaque cellule de la ligne remplie un TextBox sur l'UserForm5.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Merci beaucoup
Bonne soirée