Bonjour,

Je rencontre un petit problème...

J'ai créer une macro, qui sépare des numéros et des dates.
Le problèmes c'et que 2010 il le garde avec les 2009 :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
range("a1").select
 do while activecell.value <> ""
AnneEnCours = Year(ActiveCell.Offset(0,2).value)
 
If Year (ActiveCell.offset(0,2).value)
 
activecell.offset(1,0).select
 
else
activecell.offset(1,0).select
selection.entirerow.insert
activecell.offset(2,0).select
 
end if
 
loop
La colone C est sous fomat jj/mm/aaaa