Vb in PHP übersetzen

[Uli]

Kann mir jemand dies in PHP übersetzen   ?

Danke im voraus!

Option Explicit
Dim sAntwort As String
Dim i As Integer
Dim j As Integer
Dim w As Integer
Dim z As Integer
Dim ende As Integer

Private Sub cmdLoeschen_Click()
For i = 2 To ende
Application.Range("c" & i).Value = 0
Application.Range("d" & i).Value = 0
Application.Range("e" & i).Value = 0
Next i
End Sub

Private Sub cmdAnzahl_Click()
z = 1
Do While Cells(z, 1) <> ""
z = z + 1
Loop
ende = z - 1
MsgBox ende
End Sub

Private Sub cmdDeutsch_Click()
For i = 2 To ende
For w = 2 To 1000
j = Int((ende * Rnd) + 2)
If Cells(j, 3) = 0 Then
Application.Range("c" & j).Value = 1
Exit For
Else: End If
Next w
sAntwort = InputBox(Cells(j, 1))
If sAntwort = Cells(j, 2) Then
MsgBox ("Richtig")
Application.Range("d" & j).Value = Cells(j, 4) + 1
Else
MsgBox ("Fehler: richtig ist " & Cells(j, 2))
Application.Range("e" & j).Value = Cells(j, 5) + 1
End If
Next i

End Sub

Private Sub CommandButton3_Click()

End Sub