Ajout n lignes selon valeur

nicolasberger

XLDnaute Nouveau
Bonjour à tous,

J'ai une table à 4 champs : ID | duree | debut | valeur

Exemple : 1 | 3 | 04-01 | 100

Je voudrais obtenir ceci ID | debut | valeur/jour
1 | 04-01 | 33
1 | 05-01 | 33
1 | 06-01 | 33

Autrement dit : creer autant de lignes que la duree + repartir valeur sur la duree (100/3)

Le souci est que j'ai environ 1400 ID.

Pouvez-vous m'indiquer la marche a suivre
 

Hervé

XLDnaute Barbatruc
Bonsoir nicolas

Une proposition en vba.

Comme tu n'indiquais pas comment incrémenter les valeurs 'début', j'ai considérer que c'etait des mois :unsure:


Les données sont renvoyées feuille 2 du classeur

salut


[file name=Classeur1_20051026214051.zip size=9688]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20051026214051.zip[/file]

Message édité par: Hervé, à: 26/10/2005 21:41
 

Pièces jointes

  • Classeur1_20051026214051.zip
    9.5 KB · Affichages: 24

nicolasberger

XLDnaute Nouveau
Merci beaucoup pour cette réponse :)

J'aurai juste une question supplémentaire concernant l'incrémentation par jour et non pas par mois ?

EDIT : en fait j'ai réussi à me débrouiller en changeant le 'm' par 'd' dans les arguements de la fonction AddDate

Merci beaucoup vraiment.

Je suis très impressionné :woohoo:

Message édité par: nicolasberger, à: 27/10/2005 00:35
 

Hervé

XLDnaute Barbatruc
re nicolas, le forum


J'aurais pu penser que c'etait des jours :unsure:

dans ces lignes de code :

Case 1: tablores(3, x) = DateAdd('m', 1, tablo(i, 3))
Case Else: tablores(3, x) = DateAdd('m', 1, tablores(3, x - 1))


remplace 'm' par 'd' (respecte bien les guillemets)

salut
 

Discussions similaires

Réponses
2
Affichages
541