谁帮我翻译一下EXCEL里的VBA语言

1大概就是下面的样子，2，3你可以根据情况改一改。。。练习下。。
友情帮顶
Sub Macro1()
Dim i As Long

With Sheet1
For i = 1 To .UsedRange.Cells.Count
If UCase(.Cells(i, 2)) = "END" Then