Helpp

[paradise87]

salut tout le monde
jai besoin du code VB pour excel 2003
svp aidez moi

Exo 1
Créer une application pour calculer la somme et le produit de deux réel quelconques.
L’application doit se faire à laide de deux feuilles de calcul ; la première feuille servira à saisir les données tandis que la deuxième sera utilisée pour l’affichage des résultats.

Exo 2
Elaborer une application permettant de rendre la monnaie dans un magasin. Le résultat doit préciser le nombre de billets ou de pièces de chaque sorte et doit rendre le moins de pièces possibles.


merci davanceee

 

[vbacrumble]

Re : Helpp

Bjr

Créer une application pour calculer la somme et le produit de deux réel quelconques.

En comprenant application veut dire langage VBA

Exo1

Sub spdnb()
op = Split("+ *")
nbr = CStr(InputBox("Saisir deux entiers (a et b)" _
    & Chr(13) & "(Séparez les nombres par un espace.)" & Chr(13) _
    & Chr(13) & Chr(13) & "Valeur par défaut :", "Choix des nombres", "5 2"))
t = Split(nbr)
q = CByte(InputBox(Chr(13) & "Pour une Somme, tapez 1." _
    & Chr(13) & Chr(13) & "Pour un Produit, tapez 2", _
    "Choix de l'opération à effectuer")) - 1
ope = t(0) & op(q) & t(1)
[COLOR="Blue"]MsgBox ope & " = " & Evaluate(ope), _
    vbInformation, _
    "Résultat: " & Split("SOMME PRODUIT")(q)[/COLOR]
End Sub

Changer lignes bleues pour recopier valeurs dans la feuille de calcul.

En comprenant application veut dire utilisation des formules d'Excel
En feuille1
Les réels en A1 et B1
En feuille 2
en A1: =SOMME(Feuil1!A1:B1)
en B1=PRODUIT(Feuil1!A1:B1)


Exo2: voir du coté des algorithme gloutons (Greedy)


@+