Google Sheets API V4 Add Row.网的

Question

谷歌留档页面说

Sheets API v4确实提供了可与电子表格一起使用的AppendCells请求。batchUpdate方法将一行数据附加到工作表中（并根据需要同时更新单元格属性和格式）。

即使创建RowData有效负载很繁琐，这也可以用于添加新行。但是，这不允许设置ValueInputOption。

谷歌也表示

但是，通常更容易确定要添加行的A1符号，然后发布电子表格。价值观更新请求以覆盖该行。在这种情况下，将覆盖指定行中的任何数据。

现在，这可以用于更新现有行上的数据，包括ValueInputOption。但是，当我使用它追加新行（即提供下一行的范围）时，服务器返回503错误。我一定错过了什么把戏？

Answer 1

没有用于通过电子表格追加行的API。值集合（支持A1表示法的集合

Answer 2

我应该按照评论者的建议在我的问题中发布代码。然而，我把它作为这个答案的一部分，这显然是一个次优的解决方案，但符合我的目的。

这就是我最后使用的代码（省略OAuth和服务实例化）

 Public Function AddRows(Values As Object()()) As Boolean

        Try

            'Create dummy rows value payload
            Dim cell2add As New CellData
            Dim cellval As New ExtendedValue
            cellval.NumberValue = 0
            cell2add.UserEnteredValue = cellval
            Dim data2add As New RowData
            data2add.Values = {cell2add}

            Dim rowdataList As New List(Of RowData)
            For i = 0 To UBound(Values)
                rowdataList.Add(data2add)
            Next

            'Add a request to append to the sheet's data (expand grid)
            Dim appendRequest As New AppendCellsRequest
            appendRequest.SheetId = SheetID
            appendRequest.Rows = rowdataList.ToArray           
            appendRequest.Fields = "*"
            Dim request As New Request
            request.AppendCells = appendRequest

            'Execute the request
            Dim bRequest As New BatchUpdateSpreadsheetRequest
            bRequest.Requests = {request}
            Dim bResponse As BatchUpdateSpreadsheetResponse = Service.Spreadsheets.BatchUpdate(bRequest, DataBaseName).Execute()

            'Now update the newly added rows with data
            Dim index As Integer = GetRowCount() - Values.Length + 2 'GetRowCount() calls the service to get sheet metadata and returns the rows of data (excluding the headers)
            Dim vals As New ValueRange
            vals.Values = Values
            Dim urequest As SpreadsheetsResource.ValuesResource.UpdateRequest =
                Service.Spreadsheets.Values.Update(vals, DataBaseName, Name & "!A" & index)
            urequest.ValueInputOption = SpreadsheetsResource.ValuesResource.UpdateRequest.ValueInputOptionEnum.USERENTERED
            Dim response As UpdateValuesResponse = urequest.Execute
            Return response.UpdatedRows = Values.Length

        Catch ex As Exception
            Trace.WriteLine(Now.ToLongTimeString & ":" & ex.Message)
            Return False
        End Try

    End Function

简而言之，我调用AppEngEnter来扩展“网格”的大小，然后在创建的空白行中更新值。如果尝试更新新行的值，服务器将返回“服务不可用”错误。当我尝试更新现有行中的值（values.batchUpdate）并在同一请求中添加新行时，我发现了这个问题。在这种情况下，错误消息提到“超出网格”更新。