Erreur d'exécution 9 l'indice n'appartient pas à la selection
syrine
-
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je commence à créer une base pour la gestion physique de stock et j'ai suivi ce vidéo sur youtube
https://www.youtube.com/watch?v=XWfV5rwilDY mais ce macro ne fonctionne pas et m'affiche un message d'erreur d'exécution 9
Dim i As Integer
i = 2
Do While Sheets("Recherche").Cells(i, 1) <> ""
If Sheets("Recherche").Cells(i, 1) Like reference Then
UserForm1.Label1.Caption = Sheets("Reference").Cells(i, 1).Value
UserForm1.Label4.Caption = Sheets("Reference").Cells(i, 2).Value
verif = "ok"
UserForm1.Show
End If
i = i + 1
Loop
If verif <> "ok" Then
MsgBox "Référence invalide."
End If
End Sub
comment je dois faire s'il vous plait?
je commence à créer une base pour la gestion physique de stock et j'ai suivi ce vidéo sur youtube
https://www.youtube.com/watch?v=XWfV5rwilDY mais ce macro ne fonctionne pas et m'affiche un message d'erreur d'exécution 9
Dim i As Integer
i = 2
Do While Sheets("Recherche").Cells(i, 1) <> ""
If Sheets("Recherche").Cells(i, 1) Like reference Then
UserForm1.Label1.Caption = Sheets("Reference").Cells(i, 1).Value
UserForm1.Label4.Caption = Sheets("Reference").Cells(i, 2).Value
verif = "ok"
UserForm1.Show
End If
i = i + 1
Loop
If verif <> "ok" Then
MsgBox "Référence invalide."
End If
End Sub
comment je dois faire s'il vous plait?
A voir également:
- Erreur d'exécution 9 l'indice n'appartient pas à la selection
- Indice téléphonique - Guide
- A qui appartient ce numéro - Guide
- A qui appartient ce numéro de gsm belgique ✓ - Forum Opérateurs & Réseaux mobiles
- Erreur t32 ✓ - Forum Livebox
- Erreur 0x80070643 - Accueil - Windows