gds35
XLDnaute Impliqué
Bonjour,
J'ai un soucis ds un code VBA , et patoge , voila un extrait du code
SaiMTransport:
'
Range("O" & i).Select
Do While MTransp = ""
Load M_TRANSPORT
M_TRANSPORT.Show
If Range("O" & i).Value <> "" Then
GoTo SaiNBRepas
Else
message = MsgBox("LA SAISIE DU MOYEN DE TRANSPORT EST OBLIGATOIRE", vbOKOnly, "FRAIS DE DEPLACEMENT")
End If
Loop
'
SaiNBRepas:
'
Ma valeur i du range est incrementee si l'utilisateur demande la saisie d'une autre ligne , lorsque sur la 2eme ligne j'affiche mon USF avec sa LB , et que je sélectionne une autre valeur que la 1ere ligne , cette valeur en ligne 2 remplace la valeur de la ligne 1 et me met la valeur de la ligne 2 à blanc , et boucle sur l'erreur . Pige pas merci de votre aide. Cordialement GDS35
Configuration: Windows XP
Internet Explorer 6.0
J'ai un soucis ds un code VBA , et patoge , voila un extrait du code
SaiMTransport:
'
Range("O" & i).Select
Do While MTransp = ""
Load M_TRANSPORT
M_TRANSPORT.Show
If Range("O" & i).Value <> "" Then
GoTo SaiNBRepas
Else
message = MsgBox("LA SAISIE DU MOYEN DE TRANSPORT EST OBLIGATOIRE", vbOKOnly, "FRAIS DE DEPLACEMENT")
End If
Loop
'
SaiNBRepas:
'
Ma valeur i du range est incrementee si l'utilisateur demande la saisie d'une autre ligne , lorsque sur la 2eme ligne j'affiche mon USF avec sa LB , et que je sélectionne une autre valeur que la 1ere ligne , cette valeur en ligne 2 remplace la valeur de la ligne 1 et me met la valeur de la ligne 2 à blanc , et boucle sur l'erreur . Pige pas merci de votre aide. Cordialement GDS35
Configuration: Windows XP
Internet Explorer 6.0