IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

calcul dans un userform


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    35
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 35
    Par défaut calcul dans un userform
    re bonsoir a tous

    comment faire un calcul

    dans une case je mets une date de naissance et dans la case d'a coté il y a une case age qui se calcule automatiquement


  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    35
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 35
    Par défaut desolé mais...
    j'ai pas trouvé, j'ai du mettre les bons mots clefs

    c'est pour cela que je fais appel a vous !


  4. #4
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Une facon de faire

    Si la date saisie est en E9

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =ANNEE(AUJOURDHUI())-ANNEE(E9)
    excuse j'ai mal lu la question

    dans un userform

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DateDiff("yyyy", dateanniv, Now)

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    35
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 35
    Par défaut merci pour ta reponse
    dans l'userform
    j'ai deux case
    la premiere s'appelle date de naissance :
    et la deuxieme s'appelle age:

    la premiere je rentre la date

    et la deuxieme est calculée automatiquement

    j'ai bien eu ton code mais je le mets ou ? et comment il fait pour reconnaitre la date dans la premiere case ?


  6. #6
    Membre Expert
    Avatar de zazaraignée
    Profil pro
    Étudiant
    Inscrit en
    Février 2004
    Messages
    3 174
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2004
    Messages : 3 174
    Par défaut
    Si tu connais déjà la formule qui pourrait faire le travail dans une cellule, enregistre une macro qui contient cette formule. Examine le code. Tu pourra utiliser les fonctions VBA en l'appliquant aux valeurs récoltées dans le UserForm.

  7. #7
    Membre averti
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    35
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 35
    Par défaut voilivoila
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Sub datedenaissance()
    '
    ' datedenaissance Macro
    ' essai macro date
    '
     
    '
        Range("B3").Select
        ActiveCell.FormulaR1C1 = "=(TODAY()-RC[-1])/365"
        Range("B4").Select
    End Sub
    donc voila la macro qui en est sortie mais pour moi pauvre debutant ca me parle pas trop
    surtout je ne vois pas ensuite comment l'exploiter avec l'userform

  8. #8
    Membre Expert
    Avatar de zazaraignée
    Profil pro
    Étudiant
    Inscrit en
    Février 2004
    Messages
    3 174
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Février 2004
    Messages : 3 174
    Par défaut
    Mouais... Il est vrai qu'avec les FormulaR1C1, y'a pas grand chose à comprendre.

    L'exemple de JFontaine avec la fonction DateDiff sera plus approprié. Regarde l'aide de VBA pour plus d'explications sur cette fonction.

    J'imagine que tu as des TextBox sur ton UserForm pour saisir les données. L'aide te sera très utile pour apprendre à recueillir les données de ceux-ci.

    Tant que j'y penses, ce serait bon que tu édites tes messages pour y mettre les balises de Code. C'est le bouton de l'éditeur. Pour éditer un message, c'est le bouton

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2003] Certaines colonnes d'une feuille de calcul dans un userform
    Par Rogeure dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 22/08/2013, 18h36
  2. Réponses: 2
    Dernier message: 28/07/2013, 22h58
  3. [XL-2003] Calculer dans un userform et label
    Par dlight dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 02/01/2011, 23h48
  4. [E-97]calcul dans un userform
    Par Chicard dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 24/02/2009, 18h38
  5. Comment mettre a jour des calculs dans un userform
    Par alex.a dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 18/06/2007, 17h59

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo