Bonjour à tous,
j'ai un problème 1004 avec mon code ci-dessous, pour faire simple, avec les données que j'ai en cellules I et J26, je veux récupérer dans un grand tableau croisé à double entrée où I est en ligne et J en colonnes.
Sub note()
Dim x As String, y As String, a As Integer, b As Integer
x = Cells(26, 9)
y = Cells(26, 10)
a = 1
b = 1
Do Until Cells(a, 4) = x
a = a + 1
Loop
Do Until Cells(1, b) = y
b = b + 1
Loop
Cells(26, 11) = Cells(a, b)
End Sub
Edit modo : merci de mettre votre code entre balises avec le bouton </>
Si vous avez des idées je suis preneur