Hi Sig

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

In the Thisworkbook module
See
http://www.cpearson.com/excel/events.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Norman Jones" wrote in message ...
Hi Sige,

Sorry for the stutter,

: Workbookbook_SheetSelectionChange

should be:

Workbook_SheetSelectionChange.

---
Regards,
Norman



"Norman Jones" wrote in message ...
Hi Sige,

Use the Workbookbook_SheetSelectionChange event instead. This event will operate on all sheets, existing and new.


---
Regards,
Norman



"Sige" wrote in message oups.com...
Hi Ron,

It does what it should ...but as Worksheet_SelectionChange-sub it has
the behaviour which I had in mind... or quite. As I would like to
invoke this behaviour on a fresh workbook with 70 sheets.
No other way than copying it in 1by1?

MVG Sige