Autres XL2007 : problème variable date dans Tblo

[erics83]

Bonjour,

J'ai un problème avec une variable date : j'ai besoin d'avoir une date en format "général" et je n'y arrive pas...la variable est dans un Tblo (exemple ici avec Tbl(i,1):

Alors que je souhaite avoir "43300" à la place du 19/7/2018....
j'ai essayé

Tbl(i,1).NumberFormat = "General"   ' Marche pas
'ou
 a=Tbl(i,1).value 'Marche pas'

..et je ne peux pas changer dans le tableau de base....sinon j'aurais fait une boucle sur la colonne pour la mettre en format "general"....

Merci pour votre aide,

 

[jmfmarques]

Bonjour
tu ne nous indiques pas vraiment tous les tenants ...
Je vais me contenter de faire des suppositions :
1) regarde ce qu'affiche ceci (cas d'une chaîne de caractères)

MsgBox CLng(DateValue("19/7/2018"))

2) regarde ce qu'affiche ceci avec la date 19/7/2018 en A1

MsgBox Range("A1").Value2

 

[_Thierry]

Bonsoir @eric83, bonsoir @jmfmarques , le Forum

Comme jmfmarques, j'allais proposer de restituer la valeur de de Tab(i,1) en Long, ou bien si c'est pour la comparer à une autre tableau de convertir les deux valeur en CLng...

Bien à toi, à vous
@+Thierry

 

[erics83]

Super merci jmfmarques,

J'ai fait

CLng(DateValue(tbl(i, 1)))

et cela fonctionne parfaitement. Je souhaitais garder la valeur dans le Tblo (sans l'écrire dans la feuille) et donc votre code fonctionne parfaitement ! Merci,

Merci _Thierry, vous aviez vu juste.. avec CLng est LA solution (dans mon cas)

Merci pour votre aide,

 

[mapomme]

Bonjour @erics83,

Comme l'a évoqué @jmfmarques 🙂, tu pourrais aussi faire directement :
tbl = Feuil6.range(........).value2

 

[erics83]

Merci mapomme,

Merci pour ton aide,