Probleme VBA

Bonsoir,
J'ai 1 petit pb avec Java :
J'ai écris 5 lignes de code et ça bug?
Je n'arrive pas à comprendre.
Plutot décourragent pour un novice?
Quelqu'un peut me donner de l'aide, voici le code:

Private Sub CommandButton1_Click()
Dim i As Integer
For i = 1 To 5000
If Worksheets("Portefeuille OT").Cells(i, 1) = Demandedintervention.TextBox1.Value Then
Demandedintervention.TextBox4.Value = Worksheets("Portefeuille OT").Cells(i, 2)
End If
Next i
End Sub

3 réponses

  • Votes
  • Date
  • Date décroissante
  1. Contributeur
    Bonjour

    Quelle est l'erreur qu'il t'affiche?

     Maily   :-)))) L'hirondelle ne fait pas le printemps
    mais le dromadaire fait le désert.
    1. Salut,

      Private Sub CommandButton1_Click()

      Dim i As Integer

      For i = 1 To 5000
      If Worksheets("Portefeuille OT").Cells(i, 1) .Value =
      Val(Demandedintervention.TextBox1.Value) Then
      Demandedintervention.TextBox4.Value = Worksheets
      ("Portefeuille OT").Cells(i, 2) .Value
      End If
      Next i

      End Sub

      ++
      1. Modérateur
        Salut,

        c'est du Java ou du VBA ? :-)))

        A+ Blux
         "Les cons, ça ose tout.
        C'est même à ça qu'on les reconnait"