comment mettre stocker des résultats dans un tableau

Bonjour,

Reeaz :

Je sais que @+Thierry n'est pas là, mais c'est pas une raison pour nous redonner ton message tous les cent posts.

Lien supprimé


Lien supprimé

et cent posts plus loin :

Lien supprimé


Cela ne fera pas avancer les choses plus vite. Si tu n'as pas eu de réponse c'est peut-être que certains bossent sur ton problème et qu'ils ont du mal. On fait ce que l'on peut sur XLD. C'est inutile d'engorger avec les fichiers aussi. On les lZIPPE Les fichiers sinon on va faire sauter le FORUM.

Ici il n'y a pas de réponse ''garantie''. Ce n'est pas un service après-vente 24 h sur 24 h. On essaie, alors laisse leur le temps et si tu n'as pas de réponse c'est peut-être parce que personne ne trouve de solution.

Merci pour ta compréhension.

Bonne journée
Celeda

voilà ta macro corrigée

Option Explicit

Sub calendrier()
Dim DateDepart As Date, DateMaturite As Date
Dim date1 As Variant
Dim date2 As Variant
Dim Pas As Variant
Dim Cel As Range

'date1 = "16/1/2003"
'date2 = "16/12/2003"
date1 = InputBox("Entrez la date à laquelle vous évaluez votre option ", "Date d'évaluation", Date)
date2 = InputBox("Entrez la date de maturité ", "Date de maturité", Date)
Pas = InputBox("Entrez le pas de l'option", "Pas de l'option")
DateDepart = CDate(date1)
DateMaturite = CDate(date2)


Set Cel = Range("A1")
While DateDepart < DateMaturite

DateDepart = DateAdd("d", Pas, DateDepart)
If DateMaturite - DateDepart < 100 Then Exit Sub
Cel = DateDepart
Set Cel = Cel.Offset(1, 0)
Wend

End Sub

Bonsoir,

Bon, Ti , moi elle me semble cool ta macro et quand elle vient de toi on peut être sur à tous les coups que cela marche. C'est garanti MadeInTi.


C'est cela le service 24 H sur 24 H d'XLD et en plus d'un VBAMaster !

J'espére que XLD aura comblé les trois posts de Reeaz sinon cela sert quoi qu'il se décarcasse le Ti..................


Celeda