アットウィキロゴ

tenka

var y=new Array();
var m=new Array();
var c=new Array();
var v=new Array();
 
var vs=new Array();
 
function myFunction() {
 
 
   var id="1G0oqESgbviqCA-_m9_cO5OdYhGv92s7W0B_Ydev19jM"; 
 ex1 = SpreadsheetApp.openById(id);
 var sheet = ex1.getSheetByName("data");
 
  range=sheet.getRange("A1:D").getValues();
 
 
  for(s=1;s<1261;s++){
  y[s]=range[s][0];
  m[s]=range[s][1];
  c[s]=range[s][2];
  v[s]=range[s][3];
  } 
 
 
 
 
  var dic=new Array();
dicnumber=0;
 
for(s=1;s<1261;s++){
h=0;
for(sx=1;sx<dicnumber+1;sx++){    
if(c[s]==dic[sx])h=100;
}
if(h<50)dicnumber=dicnumber+1;
if(h<50)dic[dicnumber]=c[s];
}
 
  for(s=1;s<dicnumber+1;s++){
  vs[s]=new Array();
  }
 
 
for(n=1;n<dicnumber+1;n++){  
m=0;
for(s=1;s<1261;s++){    
if(c[s]==dic[n])m=m+1;
if(c[s]==dic[n])vs[n][m]=v[s];
}
}  
 
 
var shx = ex1.getSheetByName("io");  
 
  for(n=1;n<dicnumber+1;n++){ 
   shx.getRange(1,n+1).setValue(dic[n]);
  }
 
  for(n=1;n<dicnumber+1;n++){ 
    for(s=1;s<91;s++){
    shx.getRange(s+1,n+1).setValue(vs[n][s]);
  }
  }
 
 
  y1=2007;
  m1=12;
    for(s=1;s<91;s++){
    m1=m1+1;
      if(m1>12)y1=y1+1;
       if(m1>12)m1=1;
      str=y1+"年"+m1;
      shx.getRange(s+1,1).setValue(str);
  }
 
 
 
 
 
 
}
 
最終更新:2016年07月04日 21:51