Question

我正在尝试转换一个VBA宏，它将工作表上的列从列索引数组重新排列为Google脚本

我想返回所有列，但是数组中列出的列为前3列，所有其他列的顺序相同

原始的vba正在使用标题名称，但我正在使用列索引

我收到错误Incorrect range height, was 1 but should be 24

我不知道是否还有其他问题

提前致谢

这就是我所拥有的

function myFunction() {
var sheet =SpreadsheetApp.getActiveSpreadsheet().getSheetByName("Elements");
var data = sheet.getDataRange().getValues();
var LC = sheet.getLastColumn();
var LR = sheet.getLastRow();

var headers = [4,2,3]; //array of colunm indices
var temp = [];

var Dex = 0
for (var i = 0; i < LC; i++) {
  for(var j = 0; j < LC; j++) { 
    for (var F = 0; F < headers.length - 1; F++) {
      if (headers[F] = data[j]) {
           Dex = F
           break;
       };
     }

      if (F < i) {
         temp = data.indexOf(i);
         data[i] = data.indexOf(j)
         data[j] = temp
        }
    };
   };

  sheet.getRange(1, 1, LC,LR).setValues([data])
}

这是vba

Sub vba()
Dim rng As Range
Dim i As Integer
Dim J As Integer
Dim Temp
Dim nams As Variant
Dim F
Dim Dex As Integer

nams = Array("ItemID", "FirstName", "LastName", "Year")
Set rng = Range("A1").CurrentRegion

    For i = 1 To rng.Columns.Count
    For J = i To rng.Columns.Count
        For F = 0 To UBound(nams)
            If nams(F) = rng(J) Then Dex = F: Exit For
        Next F
        If F < i Then
            Temp = rng.Columns(i).Value
            rng(i).Resize(rng.Rows.Count) = rng.Columns(J).Value
            rng(J).Resize(rng.Rows.Count) = Temp
        End If
    Next J
Next i
End Sub

Answer 1

试试这个：

function moveColumns() {
  var sh=SpreadsheetApp.getActiveSpreadsheet().getSheetByName("Elements");
  var rg= sh.getDataRange()
  var vA=rg.getValues();
  var vB=[];
  var first3 = [8,7,6,5];
  var first3desc=first3.slice();
  first3desc.sort(function(a, b){return b-a;});
  for(var i=0;i<vA.length;i++){
    var row=vA[i];
    for(var j=0;j<first3.length;j++){
      row.splice(j,0,vA[i][first3[j]-1+j]);
    }
    for(var j=0;j<first3desc.length;j++){
      var c=first3desc[j]-1+first3.length;//for debugging
      row.splice(first3desc[j]-1+first3.length,1);
    }
    vB.push(row);
  }
  sh.getRange(1,1,vB.length,vB[0].length).setValues(vB);
}

这次是我运行它的功能。

function moveColumns() {
  var sh=SpreadsheetApp.getActiveSpreadsheet().getSheetByName("Elements");
  var rg= sh.getDataRange()
  var vA=rg.getValues();
  var vB=[];
  var first3 = [8,7,6,5,4,3,2,1];
  var first3desc=first3.slice();
  first3desc.sort(function(a, b){return b-a;});
  for(var i=0;i<vA.length;i++){
    var row=vA[i];
    for(var j=0;j<first3.length;j++){
      row.splice(j,0,vA[i][first3[j]-1+j]);
    }
    for(var j=0;j<first3desc.length;j++){
      var c=first3desc[j]-1+first3.length;
      row.splice(first3desc[j]-1+first3.length,1);
    }
    vB.push(row);
  }
  sh.getRange(1,1,vB.length,vB[0].length).setValues(vB);
}

我的＆＃34;元素＆＃34;表单之前：

我的＆＃34;元素＆＃34;表格之后：

Answer 2

在这一行

"%d"

数据获取2D数组，但稍后脚本将其作为1D数组处理。换句话说，要引用单元格值，而不是var data = sheet.getDataRange().getValues();使用类似data[index]的内容。

使用单个等号data[row][column]将对象/文字分配给变量，这样=而不是进行比较会将headers[F] = data[j]的值替换为{{headers[F]的对象。 1}}最初是一个数组。

使用Google脚本重新排列工作表上的多个列

2 个答案: