Format date

Bonjour à tous,

je me suis lancé depuis très peu sur le vba.

aujourd'hui j'ai un petit problème de format de date dans mon programme vba.

Je fais un essai de recherche dans une base de données, recherche par date. le problème, quand je renseigne une date dans mon formulaire de recherche, sur mon tableau excel le format change: exemple je cherche 01/05/2018 et ça me marque 05/01/2018. je ne sais pas quoi faire.

Bonjour et bienvenue,

Merci de joindre les éléments nécessaires pour une réponse adaptée du forum.

Cdlt.

voici mon code test:

j'essai de marquer le résultat dans une cellule mais le 01/05/2018 se marque comme 05/01/2018

Sub AfficheLaCaisse()

jour = InputBox("entrez la date du jour ")

Sheets("CAISSE").Cells(2, 3) = jour

chiffre = Sheets("CAISSE").Cells(2, 1)

MsgBox "vous avez encaissé " & Sheets("CAISSE").Cells(2, 1) & " Euro aujourd'hui !", vbInformation, "votre caisse d'aujourd'hui"

End Sub

Re,

Regarde l'aide pour InputBox (fonction) et Application.InputBox (méthode) :

https://msdn.microsoft.com/fr-fr/VBA/Language-Reference-VBA/articles/inputbox-function

https://msdn.microsoft.com/fr-fr/vba/excel-vba/articles/application-inputbox-method-excel

Cela te permettra de comprendre ton résultat.

Cdlt.

Sincèrement je n'ai pas compris la différence entre méthode inputBox et Application inputBox. je vais relire bien à tête reposée,

mais j'ai découvert qu'en fait mon problème venait du fait que je n'avais pas déclaré la variable comme étant une date!!

Je prends des mauvaises habitudes dès le départ à ne pas déclarer mes variables avec l'excuse que c'est juste un test pour voir si j'ai compris.. mais je me trompe je sais.

Ce code si fonctionne mieux et les dates ne se changent plus!

sub tes()

Dim chiffre As Date

chiffre = inputBox("entrez la date ")

Sheets("CAISSE").cells (2,1) = chiffre

end sub