Re bonjour à tous 
je ne comprends pas ce qui cloche dans ce code :
Dim annee As Date
annee = 2014
If WkB.Sheets(s).Range("H17") Like "annee" & "*" And .....
si je remplace
Like "annee" & "*"
par like"2014*" ma macro marche nickel
j' ai essayé au début dim annee as integer ect mais rien n' y fait ( ma cellule est déjà le résultat d' une macro)
merci à celui qui peut m' éclairer
	
		
			
		
		
	
				
			je ne comprends pas ce qui cloche dans ce code :
Dim annee As Date
annee = 2014
If WkB.Sheets(s).Range("H17") Like "annee" & "*" And .....
si je remplace
Like "annee" & "*"
par like"2014*" ma macro marche nickel
j' ai essayé au début dim annee as integer ect mais rien n' y fait ( ma cellule est déjà le résultat d' une macro)
merci à celui qui peut m' éclairer