hikarix - 経済統計練習帳

var comx=new Array();
var shop=new Array();
var credit=new Array();
var sale=new Array();
 
var dic_comx=new Array();
var dic_shop=new Array();
 
function myFunction() {
 
 
 
var id="1pLzZwbEBI_hxUGxFCYqKc-52GwcQRDexR-1QzXb6538";
 
 var ex1 = SpreadsheetApp.openById(id);
 var sheet = ex1.getSheetByName("data");
 
 
 var v=sheet.getRange(1,1,100,15).getValues(); 
 
  lastline=0;
 
  for(s=1;s<100;s++){
   comx[s]=""+v[s][0];
   shop[s]=""+v[s][1];
    credit[s]=""+v[s][2];
  }
 
 
 
  for(s=1;s<100;s++){
  if(credit[s].length>0)lastline=s; 
  }
 
 
  for(s=1;s<lastline+1;s++){
  if(comx[s].length<1)comx[s]=comx[s-1];
  if(shop[s].length<1)shop[s]=shop[s-1];
 
  }
 
 
  sx=0;
  for(s=1;s<lastline+1;s++){
  if(credit[s].indexOf("売")>-1)sx=sx+1;
  if(credit[s].indexOf("売")>-1)dic_shop[sx]=shop[s];
  if(credit[s].indexOf("売")>-1)dic_comx[sx]=comx[s];
  }
 
 dicnumber=sx;
 
  for(s=0;s<13;s++){
  sale[s]=new Array();
  }
 
 
  for(n=1;n<dicnumber+1;n++){
  sale[0][n]=dic_shop[n];
  }
 
  for(n=1;n<dicnumber+1;n++){
   for(s=1;s<lastline+1;s++){
  h=0;
  if(credit[s].indexOf("売")>-1)h=h+1;
  if(shop[s]==dic_shop[n])h=h+1;
  for(nx=1;nx<13;nx++){
  if(h==2)sale[nx][n]=v[s][nx+2];
  }
  }
  }
 
 
  id="1Oa25LHavYz6kuX2zMcRSHj-GYKYQ8AGOUGTQGaKtqKM";
 
 ex = SpreadsheetApp.openById(id);
  shx = ex.getSheetByName("data");
 
   shx.getRange(1,1,13,dicnumber+1).setValues(sale);
 
 
}