Fonction year et month ne marche pas

Résolu
sam*foufur Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -  
sam*foufur Messages postés 11 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je demande une date par intputbox.
Je souhaiterai qu'en cellule A1, le résultat suivant s'affiche :
(si la date donnée est 01/01/2015) --> janvier 2015 - décembre 2015
Mon problème est que les fonctions year et txt que j'utilise ne semble pas distinguer les dates. Non seulement, je n'arrive pas à concatener les éléments entre eux mais en plus les fonctions year et text affiche systématiquement janvier et 1900 quelque soit la date de départ.
Merci pour votre aide
Je joint le fichier https://www.cjoint.com/?3CfjjREDYRH

A voir également:

1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour,

Pourquoi voloir écrire une formula alors que VBA te donne le résultat
Range("b2") = "=text(" & date1 & ",""mmmm"")"
par
Range("B1")=format(date1,"mmmm")

de m^me écris
Range("b4") = Year(date1)

d'autre part, il n'y a pas de garantie de saisie correcte dans ton inputbox...
0
sam*foufur Messages postés 11 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour michel_m

J'ai effectivement enlever la formule et le résultat fonctionne.
Pour la saisie correcte de mon inputbox, je la rajouterai peut-être par la suite mais pour le moment nous ne sommes que 2 à utiliser ce fichier donc cela devrait aller.

Merci beaucoup
Bonne journée
Sam*foufur
0