Boucle conditionnelle
Fermé
arca2001
Messages postés
7
Date d'inscription
mercredi 17 janvier 2007
Statut
Membre
Dernière intervention
11 septembre 2016
-
10 juin 2016 à 00:36
arca2001 Messages postés 7 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 11 septembre 2016 - 10 juin 2016 à 11:20
arca2001 Messages postés 7 Date d'inscription mercredi 17 janvier 2007 Statut Membre Dernière intervention 11 septembre 2016 - 10 juin 2016 à 11:20
2 réponses
jordane45
Messages postés
37253
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
17 mars 2023
4 551
10 juin 2016 à 02:40
10 juin 2016 à 02:40
Bonjour,
Le code semble "correct" à l'exception qu'il serait judicieux de spécifier la feuille concernée à chaque fois... car si dans ta seconde macro tu ajoutes une nouvelle feuille... ton code ne pointe plus sur les bonnes cellules....
Donc un truc du genre :
Le code semble "correct" à l'exception qu'il serait judicieux de spécifier la feuille concernée à chaque fois... car si dans ta seconde macro tu ajoutes une nouvelle feuille... ton code ne pointe plus sur les bonnes cellules....
Donc un truc du genre :
Dim sh As Worksheet
Dim rng As Range
Set sh = Sheets("FACT")
Set rng = sh.Range(Cells(premligne, 1), Cells(dernligne, 1))
For Each c In rng
'le nom = la valeur inscrite dans la cellule de la 1er colonne
nom = c.Value
'definir la valeur test
test = sh.Cells(c.Row, 15).Value
'boucle faire tant que la cellule facturation est sup a 0
'creation d'un nouvel onglet et le nommer au nom de l enfant
If test > 0 Then Call creation_facture
Next
arca2001
Messages postés
7
Date d'inscription
mercredi 17 janvier 2007
Statut
Membre
Dernière intervention
11 septembre 2016
10 juin 2016 à 10:25
10 juin 2016 à 10:25
bonjour,
je te remercie pour ces informations utiles, mais je ne comprends toujours pas pourquoi ma formule if ne fonctionne pas correctement. as tu une idée?
quand je fais tourner la macro un seul onglet est créer
d'avance merci
cordialement
arca
je te remercie pour ces informations utiles, mais je ne comprends toujours pas pourquoi ma formule if ne fonctionne pas correctement. as tu une idée?
quand je fais tourner la macro un seul onglet est créer
d'avance merci
cordialement
arca
jordane45
Messages postés
37253
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
17 mars 2023
4 551
Modifié par jordane45 le 10/06/2016 à 10:59
Modifié par jordane45 le 10/06/2016 à 10:59
COmmence par faire tourner la macro en mode pas à pas ... et regarde la valeur de ta variable.....
Au cas où ... ajoute un peu de débogage sous la ligne qui récupère la valeur... histoire de pouvoir voir le résultat dans la fenêtre d'exécution du VBE
Au cas où ... ajoute un peu de débogage sous la ligne qui récupère la valeur... histoire de pouvoir voir le résultat dans la fenêtre d'exécution du VBE
test = sh.Cells(c.Row, 15).Value debug.print " c.row = " & c.Row & " test = " & test 'affiche dans la fenêtre d'exécution
arca2001
Messages postés
7
Date d'inscription
mercredi 17 janvier 2007
Statut
Membre
Dernière intervention
11 septembre 2016
10 juin 2016 à 11:20
10 juin 2016 à 11:20
ok merci je suis débutante en vba, j ai assimiler des truc mais me manque encore beaucoup de connaissance
je te remercie
je te remercie