Bonjour à tous,  
 
J'ai passé une heure à chercher sans résultats, je pose donc la  
question.  
Est ce que quelqu'un connaîtrait le moyen de mettre dans une variable  
la valeur affichée d'une cellule ?  
 
 
Mon problème se pose pour une date : je veux récupérer la valeur  
affichée "oct-06" qui provient de la mise en forme automatique de  
01/10/2006.  
 
 
J'ai essayé directement : ça ne marche pas.  
J'ai essayé en passant par une case fantôme et en faisant un  
PasteSpecial (xlPasteValues)( : ça ne marche pas.  
 
 
J'ai regardé tous les articles d'aide concernant display, label,  
caption et je n'ai rien vu d'intéressant.  
 
 
Je vous remercie pour votre aide,  
 
 
Lycaon  
 
 

Bonsoir,
 
 monstring = Format(Selection, Selection.NumberFormat)
Cordialement

Merci à toi.
 
J'ai essayé mais il ne reconnaît manifestement pas l'instruction Format.
Voilà ce que j'ai inscrit :  
 
M = Format(Range("B" & Prem - 4), Range("B" & Prem - 4).NumberFormat)
 
Ma variable Prem est parfaitement défninie quand j'essaye de lui faire calculer cette instruction (et supérieur à 5).
Est ce que quelqu'un voit où ça pourrait coincer ?
 
Merci à tous
 
Lycaon

Bonsoir,
pas le temps de regarder ce qiu coince, mais essayes :
 
range(........).select
suivi de:
M= Format(Selection, Selection.NumberFormat)  
@+

déjà testé. marche pô

bonsoir,
tu as bien Visual basic pour applications dans les références?
@+

Bonjour,
 
j'ai placé la fonction TODAY() en A1 pour avoir la date
J'ai formaté la cellule en "mmm/aaaa" afin d'obtenir "nov/2006"
 
Je place un petit bouton pour essayer :
 

 
Ca marche !