关于#开发语言#的问题：VBA 可以将A列的排序变成D列奇数、E列偶数这样的排序吗

Question

可以将A列的排序变成D列奇数、E列偶数这样的排序吗？求修改宏。
Private Sub CommandButton1_Click()
With ActiveWorkbook.Sheets(1)
For i = 2 To 11
.Range("a" & i).Value = "=LEFT(C" & i & ",SEARCH(" & """" & "." & """" & ",C" & i & ")-1)"
Next
End With
End Sub

Answer 1

只要把A列的值拷贝的D列，E列吗？循环判断一下奇偶性就可以了。