argaz01
Messages postés37Date d'inscriptionlundi 12 janvier 2009StatutMembreDernière intervention10 avril 2012
-
29 juin 2010 à 08:29
argaz01
Messages postés37Date d'inscriptionlundi 12 janvier 2009StatutMembreDernière intervention10 avril 2012
-
2 juil. 2010 à 08:57
Bonjour et merci d'avance,
La macro suivante marchait très bien il y'a quelques jours sur un autre tableau et maintenant elle ne produit aucun résultat et ne renvoie aucune erreur! La macro sert à faire la somme des doublons dans un tableau de 2 colonnnes:
Sub SommeDoublonsAMF()
Dim ligne As Integer
ligne = 2
Do
If Cells(ligne, 1) Cells(ligne + 1, 1) And Cells(ligne, 2) Cells(ligne + 1, 2) Then
Cells(ligne, 3) = Cells(ligne, 3) + Cells(ligne + 1, 3)
Else
ligne = ligne + 1
End If
Loop While Cells(ligne, 1) <> ""
SuppressionLignesVides
End Sub
Merci de m'éclairer sur cette question
Cordialment