%
% selection change in workbook
%
@Xls
@_xlSel
Time.Now ^" address" log)(
any?
{
 !Excel.Address
 _Excel.Worksheet
 <
 |MASTER
  @_xlR##
"rows " &3 &" cols " &2 log#
  !Excel.Cols !Excel.Rows
  _Excel.Cols 1 eq _Excel.Address "$A" atleft and
  {
   *xlsrtbit
  } if

 |Gwizard

 |HitachiA
  @!xlWs@
  @_xlR##
"rows " &3 &" cols " &2 log#
  !Excel.Cols !Excel.Rows
  _Excel.Cols 1 eq _Excel.Address "$A" atleft and
  {
Time.Now ^"xin " log#
   *xlsrxday
Time.Now ^"xout " log#
  } if

 > pop

} if