Macro somme doublmon et suppression lignes vi
argaz01
-
argaz01 -
argaz01 -
Bonjour,
Quelqu'un peut-il me dire pourquoi le code intégré dans le fichier ci-joint ne produit rien: En effet, j'aimerais que mon code supprime les lignes vides et fasse la somme des doublons:
http://www.cijoint.fr/cjlink.php?file=cj201006/cijaatMnFP.xls
D'avance merci
Cordialement
Quelqu'un peut-il me dire pourquoi le code intégré dans le fichier ci-joint ne produit rien: En effet, j'aimerais que mon code supprime les lignes vides et fasse la somme des doublons:
http://www.cijoint.fr/cjlink.php?file=cj201006/cijaatMnFP.xls
D'avance merci
Cordialement
A voir également:
- Macro somme doublmon et suppression lignes vi
- Forcer suppression fichier - Guide
- Formule somme excel ligne - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Somme si couleur - Guide
- Suppression compte gmail - Guide
8 réponses
Mais pourquoi ça ne marche chez moi (office 2003)? est-ce que le code pour faire la somme des doublons est le bon?
Cordialement
Cordialement
Apparemment le code est bon oui, mais quel est ton problème ? Que le code ne fonctionne pas du tout ? Ou bien que tu voudrais qu'il se lance automatiquement à l'ouverture, ou quelque chose dans le même genre?
En fait, quant j'utilise F8 pour exécuter le code pas à pas, la bande jaune ne passe pas sur toutes les lignes dudit code et surtout celle de end sub, ce qui fait que je ne peux pas passer à l'autre code! et puis le code ne donne rien du tout!
sos!
Cordialement
sos!
Cordialement
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Ta première fonction est très longue à tester, tu as mis for n=3000 to 1, c'est extrêmement long !! C'est surement pour ça que tu penses que ça ne donne rien du tout.
Au lieu de le lancer ligne par ligne, exécute le code en entier, sans pas à pas, et tu verras que ça fonctionne, même s'il faut patienter.
Cordialement.
Au lieu de le lancer ligne par ligne, exécute le code en entier, sans pas à pas, et tu verras que ça fonctionne, même s'il faut patienter.
Cordialement.
Quand j'exécute le code avec F5 ça supprime les lignes vides, mais les doublons restent! c'est que le code pour faire la somme des doublons ne fonctionne pas!non?
Concernant la ligne
merci
Concernant la ligne
For n = 3000 To 1 Step -1comment faire plus simple et plus court?
merci
Pour la ligne For je ne vois pas trop comment faire.
Si tu veux lancer la deuxième routine après la première, il faut que tu l'appelles dans la première. C'est-à-dire que juste avant le End Sub de ta première routine, écrire le nom de la deuxième. Ce qui donne :
Par contre ta 2e fonction ne fonctionne pas. Ce qui semble nomal vu que tu testes que les Catégories d'une ligne et le ratio de cette ligne soient égaux aux données de la ligne d'en dessous. Or ceci n'est jamais vrai dans ce que tu as mis en ligne. Donc forcément cela ne fait jamais la somme.
Ce mec la n'était pas une lumière, car il était niais.
Si tu veux lancer la deuxième routine après la première, il faut que tu l'appelles dans la première. C'est-à-dire que juste avant le End Sub de ta première routine, écrire le nom de la deuxième. Ce qui donne :
Application.ScreenUpdating = False
For n = 3000 To 1 Step -1
If Range("A" & n) = "" Then Rows(n).Delete
Next n
Application.ScreenUpdating = True
SommeDoublonsAMF
End Sub
Par contre ta 2e fonction ne fonctionne pas. Ce qui semble nomal vu que tu testes que les Catégories d'une ligne et le ratio de cette ligne soient égaux aux données de la ligne d'en dessous. Or ceci n'est jamais vrai dans ce que tu as mis en ligne. Donc forcément cela ne fait jamais la somme.
Ce mec la n'était pas une lumière, car il était niais.
