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 :

Code VBA pour date


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Femme Profil pro
    Conseiller clientèle
    Inscrit en
    Avril 2025
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Conseiller clientèle

    Informations forums :
    Inscription : Avril 2025
    Messages : 12
    Par défaut Code VBA pour date
    Bonjour,

    N'étant pas experte en VBA je viens vers vous pour un peu d'aide.

    J'ai un tableau Excel avec des CheckBox que je coche en fonction des cas.

    J'ai créé la macro suivante :
    Sub Caseàcocher_Cliquer()
    If CaseàcocherB23 = vrai Then result = InputBox("Veuillez entrer la date :")
    Range("K22").Value = result
    End Sub

    Lorsque je clique sur ma case à cocher (ex : CaseàcocherB23) sur ma feuille Excel, une popup s'ouvre, je saisi une date par exemple 02/05/2025 qui ensuite est récupérée en cellule K22.

    Mon problème est que dès lors où le n° du jour ne dépasse pas 12, Excel m'inverse les jours et les mois, ce qui est problématique car cela fausse ensuite mes autres cellules Excel qui ont besoin de cette même date dans le bon sens.

    Je pense que le problème vient du fait que pour la Macro, le format retenu est le format anglais mm/dd/yyyy. Je ne vois pas où le modifier sur Visual Basic.

    Je ne suis pas en UseForm.

    Avez-vous une idée car je cherche et tente des choses depuis plusieurs jours mais en vain... je désespère.

    Merci pour votre aide

  2. #2
    Membre habitué
    Femme Profil pro
    Conseiller clientèle
    Inscrit en
    Avril 2025
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Conseiller clientèle

    Informations forums :
    Inscription : Avril 2025
    Messages : 12
    Par défaut
    Ca y est, une personne m'a aidé sur un autre forum. Je partage la solution qui fonctionne parfaitement

    Sub Caseàcocher_Cliquer()

    Dim result

    If CaseàcocherB23 = vrai Then result = InputBox("Veuillez entrer la date :")

    If result = "" Then Exit Sub

    If IsDate(result) Then Range("K22").Value = CDate(result)

    End Sub

    Citation Envoyé par dacunha31 Voir le message
    Bonjour,

    N'étant pas experte en VBA je viens vers vous pour un peu d'aide.

    J'ai un tableau Excel avec des CheckBox que je coche en fonction des cas.

    J'ai créé la macro suivante :
    Sub Caseàcocher_Cliquer()
    If CaseàcocherB23 = vrai Then result = InputBox("Veuillez entrer la date :")
    Range("K22").Value = result
    End Sub

    Lorsque je clique sur ma case à cocher (ex : CaseàcocherB23) sur ma feuille Excel, une popup s'ouvre, je saisi une date par exemple 02/05/2025 qui ensuite est récupérée en cellule K22.

    Mon problème est que dès lors où le n° du jour ne dépasse pas 12, Excel m'inverse les jours et les mois, ce qui est problématique car cela fausse ensuite mes autres cellules Excel qui ont besoin de cette même date dans le bon sens.

    Je pense que le problème vient du fait que pour la Macro, le format retenu est le format anglais mm/dd/yyyy. Je ne vois pas où le modifier sur Visual Basic.

    Je ne suis pas en UseForm.

    Avez-vous une idée car je cherche et tente des choses depuis plusieurs jours mais en vain... je désespère.

    Merci pour votre aide

Discussions similaires

  1. Code VBA Pour une date de jour actuel
    Par rabieho-lab dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 09/03/2016, 07h57
  2. [AC-2013] Code VBA pour une date
    Par boulser dans le forum Access
    Réponses: 2
    Dernier message: 30/07/2015, 22h17
  3. [XL-2010] code vba pour formule de calcul de frequence date
    Par JENNIFER27950 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 21/11/2014, 17h32
  4. [Toutes versions] Code VBA pour comparer des dates
    Par Tagada_Or dans le forum VBA Access
    Réponses: 17
    Dernier message: 24/09/2014, 09h08
  5. [XL-2010] Code VBA pour ajout d'une date lorsqu'elle n'existe pas
    Par Jey14 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 25/10/2013, 13h39

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