Un erreur de type incompatible
HAMZAJEBENIANI
Messages postés
3
Statut
Membre
-
M-12 Messages postés 1349 Statut Membre -
M-12 Messages postés 1349 Statut Membre -
Bonjour,
j'ai pas trouver l'erreur (type incompatible dans mon code aidez-moi SVP
looper = 0
Do
i = InputBox("entrez le nombre totale d'heures de fonctionnement")
MsgBox (i)
For lp = 1 To 20
If i(lp) = "1" Then
looper = 1
MsgBox ("la saisie d'un NOMBRE a echoué veuiller verifiez le NOMBRE d'heures à saisir")
End If
Next
Loop Until (looper = 0)
j'ai pas trouver l'erreur (type incompatible dans mon code aidez-moi SVP
looper = 0
Do
i = InputBox("entrez le nombre totale d'heures de fonctionnement")
MsgBox (i)
For lp = 1 To 20
If i(lp) = "1" Then
looper = 1
MsgBox ("la saisie d'un NOMBRE a echoué veuiller verifiez le NOMBRE d'heures à saisir")
End If
Next
Loop Until (looper = 0)
Configuration: Windows / Chrome 97.0.4692.99
A voir également:
- Un erreur de type incompatible
- Type de ram - Guide
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
- Erreur t32 ✓ - Forum Livebox
- Comment changer le type de fichier - Guide
Private Sub OptionButton1_Click()
Dim i, tn, j, k As String
Dim a, b, c, mtbf, mttr, tn1, N, IPR, looper, lp As Long
looper = 0
Do
i = InputBox("entrez le nombre totale d'heures de fonctionnement")
MsgBox (i)
For lp = 1 To 20
If i(lp) = "1" Then
looper = 1
MsgBox ("la saisie d'un NOMBRE a echoué veuiller verifiez le NOMBRE d'heures à saisir")
End If
Next
Loop Until (looper = 0)