２５んｊ - 経済統計練習帳

var point=new Array();
var vs=new Array();
var comx=new Array();
var linex=new Array();
 
function myFunction() {
 
var id="1ZrTi_UiCGsPv4TCEx43HiOw1MxOFB8PdthoiLWcK5es"; 
 ex = SpreadsheetApp.openById(id);
 var sheet = ex.getSheetByName("data");
 
 var v=sheet.getRange(1, 1,590,4).getValues();
 
 
  sx=0;
  for(s=1;s<585;s++){
 str="";
 str=str+v[s][0];
 if(str.indexOf("線")>-1)sx=sx+1;
 if(str.indexOf("線")>-1)point[sx]=s; 
  }
 
 
  number=sx;
  for(s=1;s<number+1;s++){
 sx=point[s]; 
}
 
  var x=new Array();
  var vs=new Array();
 
  for(s=0;s<number+1;s++){
  x[s]=new Array();
   vs[s]=new Array();
  }
 
  x[0][0]="A";
  x[0][3]="B";
 
  for(s=1;s<number+1;s++){
  sx=point[s];
  x[s][0]=v[sx][0];
  vs[s][1]=0;
  vs[s][2]=0;
  vs[s][3]=0;
  }
 
 
  for(s=1;s<number;s++){
  s1=point[s];
  s2=point[s+1];
    tx=0;
    for(sx=s1+1;sx<s2;sx++){  
      if(v[sx][0]>0)tx=tx+1; 
      if(v[sx][0]>0)vs[s][tx]=v[sx][0]; 
      if(v[sx][1]>0)tx=tx+1; 
      if(v[sx][1]>0)vs[s][tx]=v[sx][1];; 
      if(v[sx][2]>0)tx=tx+1; 
      if(v[sx][2]>0)vs[s][tx]=v[sx][2];; 
    }
 
  }
 
  for(s=1;s<number+1;s++){
  x[s][1]=vs[s][1];
    x[s][2]=vs[s][2];
     x[s][3]=vs[s][3];
  }
 
 
   var shx = ex.getSheetByName("rev");
 
shx.getRange(1, 1,number+1,4).setValues(x);
 
 
 
}