VBA工作表指定字符

nnsea

Sub bh()
Dim rng!
For rng = 2 To 13 Step 1
Sheet3.Cells(rng, 1) = "b"
Next
End Sub