求助：“6.6.1 设计一张调查问卷”中单元格引用问题

z2sa

求助：“6.6.1 设计一张调查问卷”中单元格引用问题
在本例中代码如下：
Sub dengji()
    Dim xrow As Integer
    With Worksheets("调查结果")
        xrow = .[A1].CurrentRegion.Rows.Count + 1            '取得第一条空行行号
        .Cells(xrow, "A") = [d5]                             '写入学员ID
        '写入2到9题选择结果
        .Cells(xrow, "B").Resize(1, 16).Value = Application.WorksheetFunction. _
                                                Transpose([J10:J25].Value)
        .Cells(xrow, "R").Value = [B67].Value                '写入学员对培训中心的建议
    End With
    Union([D5:E5], [J10:J25], [B67:G67]).ClearContents       '清除调查问卷中原有答案
    MsgBox "已保存到“调查结果”工作表中！", vbInformation, "提示"
End Sub


其中“.Cells(xrow, "A") = [d5]”一句，为什么是“问卷”工作表中的D5单元值赋值给Cells(xrow, "A")而不是其它工作表？

z2sa

盼高手解决啊？