Décrémentation sur Excel

Fermé
F-RAGU Messages postés 19 Date d'inscription lundi 28 juillet 2008 Statut Membre Dernière intervention 4 octobre 2009 - 11 sept. 2009 à 08:36
michel_m Messages postés 16593 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 23 mars 2023 - 11 sept. 2009 à 09:09
Bonjour,

Je souhaite réaliser une incrémentation par ordre décroissant. Ainsi, si je rentre la valeur 15 dans la cellule C5 de la feuille "Saisie", le programme doit pouvoir réaliser une décrémentation à partir de cette valeur en colonne C de la feuille "Calculs". Voici le programme en VB réalisé à ce stade. Seulement il s'agit d'incrémentation et je ne sais pas comment faire pour faire dans l'ordre inverse.


Merci de me répondre,

F-RAGU



Sub increment()
Dim i As Integer, j As Integer, k As Integer
i = Sheets("Saisie").Range("C5").Value
With Sheets("Calculs")
.Columns("C:C").ClearContents
For j = 2 To 10 * i
.Range("C" & j).Value = (j / 10) - 0.1
Next
.Range("C1").Value = 0
.Range("C65536").End(xlUp).Offset(1, 0).Value = i
End With
End Sub

1 réponse

michel_m Messages postés 16593 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 23 mars 2023 3 292
11 sept. 2009 à 09:09
Peut-être donner suite au message
https://forums.commentcamarche.net/forum/affich-14121916-comment-switcher-un-tableau-sur-excel
pour espèrer bénéficier d'autres coups de mains
0