構造賃金

var namex=new Array();

var index=new Array();

var size=new Array();

var credit=new Array();

function myFunction() {

id="1dvLqhoAo1R1DPDRwrb-LFLifpWRTG40FBC_CEFvWS-I";

ex = SpreadsheetApp.openById(id);

var shx = ex.getSheets();

sx=0;

for ( var i in shx ){

sx=sx+1;

namex[sx]=shx[i].getSheetName();

}

number_page=sx;

Logger.log(number_page);

for(tr=19;tr<number_page+1;tr++){

sh = ex.getSheetByName(namex[tr]);

number_x=sh.getLastColumn();

number_y=sh.getLastRow();

Logger.log(number_y);

Logger.log(number_x);

var v=sh.getRange(1,1,number_y,number_x).getValues();

indexline=0;

fastline=0;

for(s=1;s<30;s++){

for(sx=1;sx<30;sx++){

h=0;

str=""+v[s][sx];

if(str.indexOf("男")>-1)h=h+1;

if(str.indexOf("女")>-1)h=h+1;

if(indexline==0)h=h+1;

if(h==3)indexline=sx;

if(h==3)fastline=s;

}}

Logger.log(fastline);

Logger.log(indexline);

lastline=0;

for(s=fastline;s<number_y;s++){

str=""+v[s][indexline];

if (str.length>0)lastline=s;

}

Logger.log(lastline);

for(s=fastline;s<lastline+1;s++){

index[s]=v[s][indexline];

}

creditx=indexline+1;

creditline=0;

for(s=1;s<fastline;s++){

str=""+v[s][creditx];

if(str.indexOf("規模")>-1)creditline=s;

}

Logger.log(creditline);

for(sx=creditx;sx<number_x;sx++){

str=""+v[creditline+1][sx];

if (str.length>0)credity=sx;

}

Logger.log(credity);

for(sx=creditx;sx<credity+1;sx++){

size[sx]=""+v[creditline][sx];

if(size[sx].length<1)size[sx]=size[sx-1];

credit[sx]=v[creditline+1][sx]+v[creditline+2][sx];

}

var delta=new Array();

for(s=0;s<lastline-fastline+3;s++){

delta[s]=new Array();

}

for(s=fastline;s<lastline+1;s++){

s1=s-fastline+2;

Logger.log(s+","+s1+","+index[s]);

delta[s1][0]=index[s].replace("\n","");

for(sx=creditx;sx<credity+1;sx++){

s2=sx-creditx+1;

delta[s1][s2]=""+v[s][sx];

}

}

for(sx=creditx;sx<credity+1;sx++){

s2=sx-creditx+1;

delta[0][s2]=size[sx].replace("\n","");

delta[1][s2]=credit[sx].replace("\n","");

}

id2="1X3zMOZtdcttCN3ljjl7adbktIhJGkkK6gsFqtGhWKqE";

ex2 = SpreadsheetApp.openById(id2);

n=""+tr

ex2.insertSheet(n);

sh2 = ex2.getSheetByName(n);

sh2.getRange(1,1,lastline-fastline+3,credity-creditx+2).setValues(delta);

sh2.getRange(1,1).setValue(namex[tr]);

}

}