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
Convertisseur récupération de texte - Guide
Recuperation video youtube - Guide
Recuperation compte gmail - Guide
Excel liste de valeurs - Guide

1 réponse

Réponse 1 / 1

f894009 Messages postés 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 1 713
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 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 1 713
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 17241 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 février 2025 1 713
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

Première connexion

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

qui veut c'echanger sont savoire

mot de passe perdu gmail