将数据从Sheet1复制并粘贴到Sheet2，然后删除输入的数据而不删除Sheet1中的功能

Question

将Sheet1中的数据从第4行复制到第13行，然后从C列复制到G列，然后将其粘贴到Sheet2并清除输入的数据，而不删除Sheet1上d列的功能

Example sheet

Answer 1

function runOne() {
  var ss=SpreadsheetApp.getActive();
  var sh1=ss.getSheetByName('Sheet1');
  var sh2=ss.getSheetByName('Sheet2');
  var rg=sh1.getRange(4,3,sh1.getLastRow()-3,5);
  var v=rg.getDisplayValues();
  var lr;
  for(var i=0;i<v.length;i++) {
    if(v[i].join('').length==0) {
      lr=i;
      break;
    }
  }
  var rg1=sh1.getRange(4,3,lr,5);
  var vA=rg1.getDisplayValues();
  var fA=rg1.getFormulas();
  rg1.copyTo(sh2.getRange(sh2.getLastRow()+1,1),{contentsOnly:true});
  for(var i=0;i<vA.length;i++) {
    for(var j=0;j<vA[i].length;j++) {
      if(!fA[i][j]=='') {
        vA[i][j]='';
      }
    }
  }
  rg1.setValues(vA);
  rg1.setFormulas(fA);
}