Récupération des valeurs

Fermé

lifefdiwa - 14 mai 2013 à 22:00
lifefdiwa - 20 mai 2013 à 12:16

Bonjour,

je suis entrain d'élaborer un simulateur pour le calcul d'une prestation d'épargne, mais j'ai rencontré un problème c'est que je n'arrive pas à récupérer les valeurs numériques figurant dans les textboxs pour les utiliser dans les formules de calcul, on me donne toujours erreur d'incompatibilité de type.

Aidez moi svp

A voir également:

Récupération des valeurs
Comment récupérer des messages supprimés sur whatsapp - Guide
Recuperation video youtube - Guide
Recuperation compte gmail - Guide
Convertisseur récupération de texte - Guide
Récupération serveur sql - Télécharger - Gestion de données

1 réponse

Réponse 1 / 1

f894009 Messages postés 17200 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 11 septembre 2024 1 708
15 mai 2013 à 09:10

Bonjour,

les valeurs saisies, ex: 4561.12, dans des texteboxs sont des chaines de caracteres, pas des nombres, il faut les convertir avant de faire des calculs avec.

lifefdiwa
15 mai 2013 à 12:33

bonjour,
merci beaucoup pour votre réponse, mais svp si vous me dîtes comment convertir en me donnant un pt exemple je vous serez très reconnaissante je suis débutante en VBA et je rencontre bcp de problème

f894009 Messages postés 17200 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 11 septembre 2024 1 708
15 mai 2013 à 16:47

Re,

instruction chaine de chiffre a convertir en nombre: Val(chaine a convertir), ex: x=Val(TextBox1)

lifefdiwa
20 mai 2013 à 10:26

MERCI bcp d'avoir répondu mais ça ne marche tjr pas, on me donne erreur : incompatibilité de type. voila mon code:
Sheets("feuil2").Range("D9") = boxtaux.Value / 100
si je met x=val(boxtaux). les taux ne seront que des entiers et ne prennent pas en considération les décimales

f894009 Messages postés 17200 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 11 septembre 2024 1 708
20 mai 2013 à 11:19

Bonjour,

il fallait dire que vous ecriviez des cellules de feuille excel. Pas besoin de Val(textbox). Par contre vous devez avoir l'erreur si la textbox est vide.

    If boxtaux<> "" Then
        Sheets("feuil1").Range("D9") = boxtaux.Value / 100
    Else
         Sheets("feuil1").Range("D9") =0
    End If

lifefdiwa
20 mai 2013 à 12:16

merci bcp pour votre aide, j'apprécie bcp.
bonne début de semaine .

Discussions similaires

Problème de restrictions

Mail étrange (demande de reinitialisation MDP)

Première connexion

High Sierra : refus de réinstallation "serveur pas contacté"

Code de récupération de compte ne fonctionne pas

Discussions similaires

Newsletters