d2xp - 経済統計練習帳

var d=new Array();
var credit=new Array();
var subcredit=new Array();
var v=new Array();
var io=new Array();
var date=new Array();
var unit=new Array();
 
function sample() {
 
 
 var id="1QielnbO31BsXo83kIP6rI6bah1GCBHP-9ayfSjlbE4g"; 
 ex1 = SpreadsheetApp.openById(id);
 var sheet = ex1.getSheetByName("data"); 
 
var d=sheet.getRange(1,1,354,130).getValues();  
 
  fastline=5;
  lastline=353;
 
  for(s=1;s<354;s++){
  date[s]=d[s][0];
    Logger.log(s+","+d[s][0]);
  }
 
 
  creditx=1;
  credity=113;
 
 for(s=1;s<130;s++){
 credit[s]=d[0][s]; 
 subcredit[s]=d[1][s];  
 if(credit[s].length>1)subcredit[s]="合計";
 if(credit[s].length<1)credit[s]=credit[s-1];
 if(subcredit[s].length<1)subcredit[s]=subcredit[s-1];
 unit[s]=d[3][s]; 
  }
 
  var p=new Array();
 
 
 
  s1=0;
  for(sx=creditx;sx<credity+1;sx++){
  if(unit[sx].indexOf("金")>-1)s1=s1+1;
  if(unit[sx].indexOf("金")>-1)p[s1]=sx;
  }
 
  number=s1;
 Logger.log(number);
 
time=lastline-fastline+1;
 
   Logger.log(time);
 
  var z=new Array();
 
  for(s=0;s<time+1;s++){
  z[s]=new Array();
  }
 
  for(s=1;s<time+1;s++){
    s1=s+fastline-1;
    z[s][0]=d[s1][0];
    for(sx=1;sx<number+1;sx++){
    s2=p[sx];
   z[s][sx]=d[s1][s2];
 
    }}
 
 
 
  z[0][0]="";
  for(sx=1;sx<number+1;sx++){
  s2=p[sx];
  z[0][sx]=credit[s2]+subcredit[s2];
  }
 
   var shx = ex1.getSheetByName("rev"); 
 
  shx.getRange(1,1,time+1,number+1).setValues(z);  
 
 
 
 
}