Autres .value ou .text

FOUQUET Yves

XLDnaute Occasionnel
Bonjour,

Afin de ne pas mourir idiot, quelqu'un peut m'expliquer ligne par ligne, avec des mots simples, ce que produisent les lignes de codes ci dessous et au passage m'expliquer la différence entre TextBox3.value et TextBox3.text

VB:
T3 = CDate(TextBox3.Value)  '--- dans le TextBox3  à la saisie c'est: 01/05/2020

T3 = LTrim(T3)

valeurdate3 = CDec(CDate(T3))
 
Range("K" & l).Value = valeurdate10  '--- date de naissance

Surtout quel est, dans ce cas, le format qui sera enregistré dans la cellule: nombre, date, texte, standard,...?
Merci d'avance.
Yves
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re,
VB:
Sub test()

T3 = CDate(TextBox3)             ' convertit le texte de TextBox3 en date (du moins essaye)
                                 ' T3 est Variant/Date

T3 = LTrim(T3)                   ' ôte les espace à gauche (inutile ???) T3 redevient du texte
                                 ' comme résultat de la fonction LTrim "01/05/2020"
                                 ' T3 est Variant/String

valeurdate3 = CDec(CDate(T3))    ' transforme T3 en date puis le transforme en décimal
                                 ' valeurdate3 est variant/Décimal

Range("A1").Value = valeurdate3  ' affecte valeurdate3 à la cellule A1
                                 ' A1 contient un nombre.
                                 ' si vous formatez A1 en date, A1 affichera la date 01/05/2020
End Sub


Le plus simple étant :

Code:
Range("A1") = CDate(TextBox3)
 

Statistiques des forums

Discussions
312 345
Messages
2 087 482
Membres
103 556
dernier inscrit
titboine