Pour créer une boucle sous VBA
Bonjour à toutes et à tous,
Je suis débutant en VBA et je souhaite de l’aide pour ma problématique.
Je souhaite faire une boucle avec deux conditions : la première c’est de copier-coller la valeur de la cellule qui se trouve en dessus quand celle d’en bas est inférieur à 12 et de la coller sur la première cellule à gauche. La deuxième condition est de mettre fin à cette boucle quand la cellule est vide.
J’arrête mon charabia pour vous donner un exemple :
99956888
99956888 1
99956888 2
99956889
99956889 1
99956890
99956890 1
99956890 2
La première colonne est le résultat souhaité.
Merci pour votre aide.
99956888
99956888 1
99956888 2
99956889
99956889 1
99956890
99956890 1
99956890 2
99956888
99956888 1
99956888 2
99956889
99956889 1
99956890
99956890 1
99956890 2
Tant pis je n'arrive pas à insérer le tableau il mis tout dans la même colonne
Voici l'exemple sous Exce
l
Bonjour,
La classe
Yacine
Dommage ça ne marche pas quand j'insère plusieurs lignes .
Message d'erreur dépassement de capacité s'affiche, et débogage sur Valeur = Range("B2").Value
Quelle est la valeur de B2 ?
A+
Slt
C est un chiffre > 12
Euh ! oui mais encore ?
Je suppose que dans B2 il n'y a pas "C'est un chiffre > 12".
A+
j'ai copier-coller ton programme vba dans le fichier sur lequel je travail sauf que ce dernier à des milliers de lignes et une 10 de colonnes. Y a que la première colonne que j'ai laissé vide pour coller les données (n° de commendes). et malheureusement ça n'a pas fonctionner.
J'ai refait la même chose dans le fichier que tu m'as envoyé (plusieurs lignes >10000) même résultats.
Ci-joint le fichier avec des milliers de lignes ça ne marche pas
J'espère que je ne te dérange et merci bcp pour ton aide.
L'erreur est liée au fait que les nombre affichés ne sont pas des entiers, contrairement aux nombres présentés dans ton fichier initial.
Tu peux modifier la déclaration de la variable Valeur :
Dim Valeur As DoubleDe plus, après la ligne 23, on ne retrouve plus la logique des numéros <=12.
Le traitement ne sert plus à rien.
A quoi correspondent ces numéros avec décimales ?
A+
Désole pour les chiffres qui ne sont pas logique une erreur de ma part
Sinon avec as double ça fonctionne parfaitement
Merci BCp pour ton aide
Tu assure bravo