我们在React Native项目中使用apolloclient,有人可以指导我们如何在使用hmac进行的查询中添加hmac吗?
答案 0 :(得分:0)
我希望有帮助
Option Explicit
Private Sub TransferToJournalSheet()
Dim sourceSheet As Worksheet
Set sourceSheet = ThisWorkbook.Worksheets("Formulaire du journal")
Dim sourceTable As ListObject
Debug.Assert sourceSheet.ListObjects.Count > 0 ' If code pauses on this line, check if you have a table on sourceSheet
Set sourceTable = sourceSheet.ListObjects(1) ' If there is a name, you can specify the name instead of index.
Dim destinationSheet As Worksheet
Set destinationSheet = ThisWorkbook.Worksheets("Journal")
Dim destinationRowIndex As Long
destinationRowIndex = destinationSheet.Cells(destinationSheet.Rows.CountLarge, "E").End(xlUp).Row + 1
Debug.Assert destinationRowIndex > 2
Debug.Assert sourceTable.Range.Rows.Count > 1 ' If code pauses on this line, check if there is any data to transfer.
With sourceTable.DataBodyRange
destinationSheet.Cells(destinationRowIndex, "E").Resize(.Rows.Count).FormulaLocal = sourceSheet.Range("D7").Value
destinationSheet.Range("F" & destinationRowIndex, "G" & destinationRowIndex).Resize(.Rows.Count).Value2 = .Columns("B:C").Value
destinationSheet.Range("J" & destinationRowIndex, "K" & destinationRowIndex).Resize(.Rows.Count).Value2 = .Columns("E:F").Value
destinationSheet.Cells(destinationRowIndex, "L").Resize(.Rows.Count).FormulaLocal = sourceSheet.Range("D9").Value
End With
End Sub