协助lF语句和单循环

Question

我厌倦了每一个Empty cell FakeEmail(i).com，所以如果我有3个“空单元格”

FakeEmail1.com FakeEmail2.com FakeEmail3.com

在各自的细胞中

我知道这不正确，但无法弄清楚正确的句法 Cells(i, 4).Value = FakeEmail(i).com

由于

Sub AAA()
Dim lRow As Long
Dim i As Long
lRow = Range("D" & Rows.Count).End(xlUp).Row

For i = 1 To lRow
    If Cells(i, 4).Value = "" Then
        Cells(i, 4).Value = FakeEmail(i).com
    End If
Next i
End Sub

Answer 1

尝试

   Cells(i, 4).Value = "FakeEmail" & i & ".com