« Macros-commandes VBA/Exercices/Convertisseur Euro-Franc » : différence entre les versions
Contenu supprimé Contenu ajouté
m Robot : Remplacement de texte automatisé (-\n(==={0,3})(?: *)([^\n=]+)(?: *)\1(?: *)\n +\n\1 \2 \1\n) |
Dépeuplement de Catégorie:Pages utilisant des balises source obsolètes |
||
Ligne 35 :
** Effectuer votre calcul : montantenfranc = montanteneuro * 6.55957
** Afficher le résultat avec une boite d'affichage : MsgBox("Le montant correspondant en francs est : " & montantenfranc ,"Convertisseur €-Fr")
<
Sub convertisseureurofranc()
Dim montanteneuro As Currency 'Currency est important pour pouvoir saisir un format monétaire en euros
Ligne 43 :
MsgBox("Le montant correspondant en francs est : " & montantenfranc, "Convertisseur €-Fr") 'le résultat est affiché
End Sub
</syntaxhighlight>
{{Clr}}
| |||