Première application

Bonjour,

Voilà, je commence mon premier TP en VBA et je bloque. J'ai du mal à passer de la théorie à la pratique.. j'arrive par exemple à dire voilà, ici je vais utiliser la fonction DateAdd, mais comment chercher les taux?

Jusque là, j'ai réussi à créer le bouton et à incrémenter la date et voici mon code. Mais

Private Sub CommandButton1_Click()

With ActiveSheet.Range("A1")

.Value = DateAdd("m", 3, .Value)

End With

End Sub

Voici mon TP de référence, pouvez-vous m'aider? Merci beaucoup...

13tpvba.xls (17.00 Ko)
11tpvba.docx (12.28 Ko)

Bonjour,

A tester.

Option Explicit
Public Sub test()
With ActiveSheet
    .[A1] = DateAdd("m", 3, [A1])
End With
End Sub

Bonjour Eric, Merci beaucoup pour ta réponse. En fait, ce n'est pas au stade de la création du bouton ou l'ajout de la date que je bloque mais après, pour ce qui concerne la recherche de valeur, la génération de nombres dans un intervalle...

Merci tout de même pour ton aide.

Bonjour,

Donc voilà, je suis à la dernière question et là je ne sais vraiment pas comment faire. J'espère qu'on m'aidera.

Voici ce qu'il faut faire:

Dans la question d'avant, j'ai généré cinq taux d'intérêts aléatoires, et nous avons cinq flux, il faut donc calculer le flux actualisé pour chaque taux pour tous les flux et faire la somme, puis les afficher dans une case à côté du taux generé.

Ma logique:

Créer une boucle qui calcule les flux actualisés de tous les flux pour un taux et fait la somme, et ensuite créer une boucle qui refait la première boucle pour tous les taux et affiche dans une cellule donnée.

Ce qui me bloque :

  • Comment faire la somme des flux sans les avoir affichés?
  • Comment utiliser une boucle dans une boucle?

Merci beaucoup

Voici où j'en suis

10tpvba.xlsm (26.54 Ko)

personne ?

Rechercher des sujets similaires à "premiere application"