bonjour,
j'ai un probleme d'insertion de ligne dans un tableau excel
j'ai un tableau qui se rempli
je voudrai inserer une ligne vide quand la valeur de la cellule(ligne r, colonne A) est differente de la valeur de la cellule(ligne r-1, colonne A)
voici mon code:
mais ma comparaison de valeur ne marche pas et je ne sais pas pourquoi?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 For f = 0 To theFields - 1 xlapp.Cells(r, f + 1) = rst.Fields(f).Value If xlapp.Range(r & "0").Value <> xlapp.Range(r - 1 & "0").Value Then Worksheets("Missions in progress Follow up").Cells(r,0).EntireRow.Insert End If Next f
si quelqu'un peut m'expliquer mon erreur?
Partager