VBA problème avec la boucle J sur un worksheet

[kelyos]

Tout est dans le titre, quand je veux afficher les lignes de la feuille positionsMOT sur une condition avec la feuille principale avec la boucle j (alors qu'avec la boucle i ca marche bien) ca ne marche pas et ne m'affiche pas ligne par ligne les bonnes info, est ce normal ? merci d'avance


Private Sub CommandButton1_Click()

Dim cellule As Range
Dim j As Integer
Dim i As Integer
Dim mot As Range


Set mot = Cells.Find(Range("B7").Value)

For i = 7 To 8

For j = 2 To 3

If Application.Worksheets("positionsMOT").Range("H" & j) = mot Then
Range("C" & i) = Application.Worksheets("positionsMOT").Range("B" & j)
Range("D" & i) = Application.Worksheets("positionsMOT").Range("M" & j)
End If

Next
Next

End Sub

 

[tototiti2008]

Re : VBA problème avec la boucle J sur un worksheet

Bonjour keyos,

Bienvenue sur XLD

Un Bonjour n'est pas de trop

ca ne marche pas et ne m'affiche pas ligne par ligne les bonnes info, est ce normal ?

Et où sont les bonnes infos ? Comment pourrait-on le deviner ?
J'ai manqué le dernier séminaire de divination, désolé 🙂

Bref, un bout de fichier exemple (comme indiqué lors de la création d'une nouvelle discussion) nous aiderait grandement