Bonjour à tous.
Voici un type de tableau que j'exploite.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés
qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en
l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les
lignes juste au-dessous le nombre d'occurence manquante pour attendre la
quantité spécifiée.
J'espère avoir été clair.
Merci par avance de votre aide.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
stéphane
Bonjour,
si tu veux une réponse mets un exemple clair.
"Frank" a écrit dans le message de news:
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.
Bonjour,
si tu veux une réponse mets un exemple clair.
"Frank" <Frank@discussions.microsoft.com> a écrit dans le message de news:
C0748702-6A3D-4E0C-90F6-E542554F7754@microsoft.com...
Bonjour à tous.
Voici un type de tableau que j'exploite.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et
dés
qu'une quantité est supérieur à 1, que le contenu de la ligne en question
(en
l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou
les
lignes juste au-dessous le nombre d'occurence manquante pour attendre la
quantité spécifiée.
J'espère avoir été clair.
Merci par avance de votre aide.
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.
stéphane
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ?
ca sera peut être plus clair !
"Frank" <Frank@discussions.microsoft.com> a écrit dans le message de news:
C0748702-6A3D-4E0C-90F6-E542554F7754@microsoft.com...
Bonjour à tous.
Voici un type de tableau que j'exploite.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et
dés
qu'une quantité est supérieur à 1, que le contenu de la ligne en question
(en
l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou
les
lignes juste au-dessous le nombre d'occurence manquante pour attendre la
quantité spécifiée.
J'espère avoir été clair.
Merci par avance de votre aide.
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.
Frank
OK voilà ce que je désire obtenir. A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-001 closed 05/05/08 3 4 Q00004265-001 closed 05/05/08 3 5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
> Bonjour à tous. > Voici un type de tableau que j'exploite. > > A B C D > Numéro Etat Date Quantité > 1 Q00004007-005 closed 05/09/08 1 > 2 Q00004265-001 closed 05/05/08 3 > 3 Q00004265-009 closed 05/05/08 1 > > Ce que je voudrais faire est de balayer automatiquement la colonne D et > dés > qu'une quantité est supérieur à 1, que le contenu de la ligne en question > (en > l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou > les > lignes juste au-dessous le nombre d'occurence manquante pour attendre la > quantité spécifiée. > J'espère avoir été clair. > Merci par avance de votre aide.
OK voilà ce que je désire obtenir.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-001 closed 05/05/08 3
4 Q00004265-001 closed 05/05/08 3
5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ?
ca sera peut être plus clair !
"Frank" <Frank@discussions.microsoft.com> a écrit dans le message de news:
C0748702-6A3D-4E0C-90F6-E542554F7754@microsoft.com...
> Bonjour à tous.
> Voici un type de tableau que j'exploite.
>
> A B C D
> Numéro Etat Date Quantité
> 1 Q00004007-005 closed 05/09/08 1
> 2 Q00004265-001 closed 05/05/08 3
> 3 Q00004265-009 closed 05/05/08 1
>
> Ce que je voudrais faire est de balayer automatiquement la colonne D et
> dés
> qu'une quantité est supérieur à 1, que le contenu de la ligne en question
> (en
> l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou
> les
> lignes juste au-dessous le nombre d'occurence manquante pour attendre la
> quantité spécifiée.
> J'espère avoir été clair.
> Merci par avance de votre aide.
OK voilà ce que je désire obtenir. A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-001 closed 05/05/08 3 4 Q00004265-001 closed 05/05/08 3 5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
> Bonjour à tous. > Voici un type de tableau que j'exploite. > > A B C D > Numéro Etat Date Quantité > 1 Q00004007-005 closed 05/09/08 1 > 2 Q00004265-001 closed 05/05/08 3 > 3 Q00004265-009 closed 05/05/08 1 > > Ce que je voudrais faire est de balayer automatiquement la colonne D et > dés > qu'une quantité est supérieur à 1, que le contenu de la ligne en question > (en > l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou > les > lignes juste au-dessous le nombre d'occurence manquante pour attendre la > quantité spécifiée. > J'espère avoir été clair. > Merci par avance de votre aide.
stéphane
ça devrait faire l'affaire.
Cependant, si tu laisses la Qté à 3 sur chacune des 3 lignes (chose que je ne comprends pas) si tu relances la routine des données seront complètement faussées
sub Routine
Dim i As Long, Qte As Integer
For i = ActiveSheet.Cells(Cells.Rows.Count, 1).End(xlUp).Row To 1 Step -1 Qte = ActiveSheet.Cells(i, 4) If Qte > 1 Then While Qte > 1 ActiveSheet.Range(Cells(i, 1), Cells(i, 4)).Copy ActiveSheet.Cells(i + 1, 1).Insert shift:=xlDown Qte = Qte - 1 Wend End If
Next i
end sub
"Frank" a écrit dans le message de news:
OK voilà ce que je désire obtenir. A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-001 closed 05/05/08 3 4 Q00004265-001 closed 05/05/08 3 5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
> Bonjour à tous. > Voici un type de tableau que j'exploite. > > A B C D > Numéro Etat Date Quantité > 1 Q00004007-005 closed 05/09/08 1 > 2 Q00004265-001 closed 05/05/08 3 > 3 Q00004265-009 closed 05/05/08 1 > > Ce que je voudrais faire est de balayer automatiquement la colonne D et > dés > qu'une quantité est supérieur à 1, que le contenu de la ligne en > question > (en > l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou > les > lignes juste au-dessous le nombre d'occurence manquante pour attendre > la > quantité spécifiée. > J'espère avoir été clair. > Merci par avance de votre aide.
ça devrait faire l'affaire.
Cependant, si tu laisses la Qté à 3 sur chacune des 3 lignes (chose que je
ne comprends pas) si tu relances la routine des données seront complètement
faussées
sub Routine
Dim i As Long, Qte As Integer
For i = ActiveSheet.Cells(Cells.Rows.Count, 1).End(xlUp).Row To 1 Step -1
Qte = ActiveSheet.Cells(i, 4)
If Qte > 1 Then
While Qte > 1
ActiveSheet.Range(Cells(i, 1), Cells(i, 4)).Copy
ActiveSheet.Cells(i + 1, 1).Insert shift:=xlDown
Qte = Qte - 1
Wend
End If
Next i
end sub
"Frank" <Frank@discussions.microsoft.com> a écrit dans le message de news:
3D2D1864-AA65-42C1-96B6-EB69DAB17EDB@microsoft.com...
OK voilà ce que je désire obtenir.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-001 closed 05/05/08 3
4 Q00004265-001 closed 05/05/08 3
5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ?
ca sera peut être plus clair !
"Frank" <Frank@discussions.microsoft.com> a écrit dans le message de
news:
C0748702-6A3D-4E0C-90F6-E542554F7754@microsoft.com...
> Bonjour à tous.
> Voici un type de tableau que j'exploite.
>
> A B C D
> Numéro Etat Date Quantité
> 1 Q00004007-005 closed 05/09/08 1
> 2 Q00004265-001 closed 05/05/08 3
> 3 Q00004265-009 closed 05/05/08 1
>
> Ce que je voudrais faire est de balayer automatiquement la colonne D et
> dés
> qu'une quantité est supérieur à 1, que le contenu de la ligne en
> question
> (en
> l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou
> les
> lignes juste au-dessous le nombre d'occurence manquante pour attendre
> la
> quantité spécifiée.
> J'espère avoir été clair.
> Merci par avance de votre aide.
Cependant, si tu laisses la Qté à 3 sur chacune des 3 lignes (chose que je ne comprends pas) si tu relances la routine des données seront complètement faussées
sub Routine
Dim i As Long, Qte As Integer
For i = ActiveSheet.Cells(Cells.Rows.Count, 1).End(xlUp).Row To 1 Step -1 Qte = ActiveSheet.Cells(i, 4) If Qte > 1 Then While Qte > 1 ActiveSheet.Range(Cells(i, 1), Cells(i, 4)).Copy ActiveSheet.Cells(i + 1, 1).Insert shift:=xlDown Qte = Qte - 1 Wend End If
Next i
end sub
"Frank" a écrit dans le message de news:
OK voilà ce que je désire obtenir. A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-001 closed 05/05/08 3 4 Q00004265-001 closed 05/05/08 3 5 Q00004265-009 closed 05/05/08 1
"stéphane" a écrit :
Bonjour,
tu peux mettre un exemple du résultat que tu souhaites obtenir ? ca sera peut être plus clair !
"Frank" a écrit dans le message de news:
> Bonjour à tous. > Voici un type de tableau que j'exploite. > > A B C D > Numéro Etat Date Quantité > 1 Q00004007-005 closed 05/09/08 1 > 2 Q00004265-001 closed 05/05/08 3 > 3 Q00004265-009 closed 05/05/08 1 > > Ce que je voudrais faire est de balayer automatiquement la colonne D et > dés > qu'une quantité est supérieur à 1, que le contenu de la ligne en > question > (en > l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou > les > lignes juste au-dessous le nombre d'occurence manquante pour attendre > la > quantité spécifiée. > J'espère avoir été clair. > Merci par avance de votre aide.
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.
Mishell
"Frank" <Frank@discussions.microsoft.com> wrote in message
news:C0748702-6A3D-4E0C-90F6-E542554F7754@microsoft.com...
Bonjour à tous.
Voici un type de tableau que j'exploite.
A B C D
Numéro Etat Date Quantité
1 Q00004007-005 closed 05/09/08 1
2 Q00004265-001 closed 05/05/08 3
3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et
dés
qu'une quantité est supérieur à 1, que le contenu de la ligne en question
(en
l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou
les
lignes juste au-dessous le nombre d'occurence manquante pour attendre la
quantité spécifiée.
J'espère avoir été clair.
Merci par avance de votre aide.
Bonjour à tous. Voici un type de tableau que j'exploite.
A B C D Numéro Etat Date Quantité 1 Q00004007-005 closed 05/09/08 1 2 Q00004265-001 closed 05/05/08 3 3 Q00004265-009 closed 05/05/08 1
Ce que je voudrais faire est de balayer automatiquement la colonne D et dés qu'une quantité est supérieur à 1, que le contenu de la ligne en question (en l'occurence la 2 ici) soit automatiquement copiée et insérée dans la ou les lignes juste au-dessous le nombre d'occurence manquante pour attendre la quantité spécifiée. J'espère avoir été clair. Merci par avance de votre aide.