次のコードは、D列を基準に降順でデータを並べ替えるマクロである。
以下の空欄に入る適切な語句を解答しなさい。

Sub Exam1()
With Sheets("Sheet2").
..Clear
.SortFields.Add2 Key:=Range("D2"), _
SortOn:=xlSortOnValues, _
Order:=xlDescending, _
DataOption:=xlSortNormal
.SetRange Range("A1:D9")
.Header = xlYes
.Apply
End With
End Sub