Turkleton I don't quite understand you | A mettre dans "ThisWorkbook" :
  
  Code :
 - Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
 - ByVal Target As Excel.Range)
 - cells(1,1) = Target.Column
 - Cells(2,1) = Target.Row
 - End Sub
 
  |  
 
   Hahem, ça m'a pris 30 secondes sous Google pour retrouver la syntaxe de la fonction (j'ai cherché "vba évènement" )       ---------------
			 If you think it could look good, then I guess it should
    |