Helpp

paradise87 · 3 Décembre 2008

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 · 3 Décembre 2008

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

Code:

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)

@+

Helpp

paradise87

Guest

vbacrumble

XLDnaute Accro

Discussions similaires

Helpp

paradise87

Guest

vbacrumble

XLDnaute Accro

Discussions similaires

Privacy & Transparency

Privacy & Transparency