・・・(略)・・・
SSpread SSpread1 {
 ・・・(略)・・・
 Function OnRClicked( e ) {
  var xml_txt = "<?xml version=\"1.0\" encoding=\"SHIFT_JIS\"?>
   <menudefine>
   <menuitem id=\"1\" title=\"挿入\" />
   <separator />
   <menuitem id=\"2\" title=\"削除\" />
   </menudefine>";
   
  var domimpl = new xmlDOMImplementation;
  var dom = domimpl.parse(xml_txt);  
  	
  /* XMLデータをpopupMenuへセット */
  var id = popupMenu(dom);
  
  /* ブロック選択判定用変数 */
  var colStart = 0;
  var rowStart = 0;
  var colEnd = 0;
  var rowEnd = 0;
  	
  /* 挿入行・削除行カウント変数 */
  var insertCnt = 0;
  var deleteCnt = 0;
  ・・・(略)・・・
  if(id == 1){
    /* 行単位で選択した場合 */
    if(colEnd == -1){
      /* 挿入行数を計算する */
      insertCnt = rowEnd - rowStart + 1;
      
      /* 行を選択した分挿入する */
      InsertRows(rowStart, insertCnt);
      
    /* 列単位で選択した場合 */
    }else if(rowEnd == -1){
      /* 挿入列数を計算する */
      insertCnt = colEnd - colStart + 1;
      
      /* 列を選択した分挿入する */
      InsertCols(colStart, insertCnt);
    }
    
  }else if(id == 2){
    /* 行単位で選択した場合 */
    if(colEnd == -1){
      /* 削除行数を計算する */
      deleteCnt = rowEnd - rowStart + 1;
      
      /* 行を選択した分削除する */
      DeleteRows(rowStart, deleteCnt);
      
      /* 列単位で選択した場合 */	
    }else if(rowEnd == -1){
      /* 削除列数を計算する */
      deleteCnt = colEnd - colStart + 1;
      
      /* 列を選択した分削除する */
      DeleteCols(colStart, deleteCnt);
    }
  }
 }
}