Нужна помощь в переводе этого Excel VBA на листы Google Java - PullRequest
Новая
       48

Нужна помощь в переводе этого Excel VBA на листы Google Java

0 голосов
/ 26 сентября 2019

Мне нужна помощь в написании этого кода VBA в java для электронных таблиц Google.Я пытаюсь автоматизировать лотерею, и, поскольку VBA не распознается электронными таблицами Google, я изо всех сил пытаюсь преобразовать ее. 

    Sub FullTable()
'
'     Make Full Table
'
Dim N As Long, i As Long, ii As Long, K As Long
N = Cells(Rows.Count, "A").End(xlUp).Row
K = 1
For i = 1 To N
    nm = Cells(i, "A")
    j = Cells(i, "B")
    For ii = 1 To j
    Cells(K, "D") = nm
    K = K + 1
    Next ii
Next i
K = K - 1
'
'     Pick Winners
'
Dim col As Collection
Set col = New Collection
Dim wf As WorksheetFunction
Set wf = Application.WorksheetFunction
Do Until col.Count = 5
    N = wf.RandBetween(1, K)
    On Error Resume Next
    col.Add Item:=Cells(N, "D").Value, Key:=CStr(Cells(N, "D").Value)
    On Error GoTo 0
Loop
'
'Post Winners
'
For i = 1 To 5
    Cells(i, "E").Value = col(i)
Next i
End Sub

На данный момент я написал 

    Function FullTable(){
     double N, i, ii, K;
      var table = SpreadsheetApp.getActiveSheet().getRange
     N = getRange(1,i)

И я изо всех сил пытаюсь написать это в Java

...