excel表格排序.让所有的数据按照B列的顺序使C列与其相同排列起来 .如第一个排号是9,就将序号的9,以及姓名,成绩等全部排在第一行.排成:20070102009 9 9 谢芳 98 84 85 97 8320070102005 5 5 扬林 58 85 77
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/05 20:45:12
![excel表格排序.让所有的数据按照B列的顺序使C列与其相同排列起来 .如第一个排号是9,就将序号的9,以及姓名,成绩等全部排在第一行.排成:20070102009 9 9 谢芳 98 84 85 97 8320070102005 5 5 扬林 58 85 77](/uploads/image/z/4491083-11-3.jpg?t=excel%E8%A1%A8%E6%A0%BC%E6%8E%92%E5%BA%8F.%E8%AE%A9%E6%89%80%E6%9C%89%E7%9A%84%E6%95%B0%E6%8D%AE%E6%8C%89%E7%85%A7B%E5%88%97%E7%9A%84%E9%A1%BA%E5%BA%8F%E4%BD%BFC%E5%88%97%E4%B8%8E%E5%85%B6%E7%9B%B8%E5%90%8C%E6%8E%92%E5%88%97%E8%B5%B7%E6%9D%A5+.%E5%A6%82%E7%AC%AC%E4%B8%80%E4%B8%AA%E6%8E%92%E5%8F%B7%E6%98%AF9%2C%E5%B0%B1%E5%B0%86%E5%BA%8F%E5%8F%B7%E7%9A%849%2C%E4%BB%A5%E5%8F%8A%E5%A7%93%E5%90%8D%2C%E6%88%90%E7%BB%A9%E7%AD%89%E5%85%A8%E9%83%A8%E6%8E%92%E5%9C%A8%E7%AC%AC%E4%B8%80%E8%A1%8C.%E6%8E%92%E6%88%90%EF%BC%9A20070102009+9+9+%E8%B0%A2%E8%8A%B3+98+84+85+97+8320070102005+5+5+%E6%89%AC%E6%9E%97+58+85+77)
excel表格排序.让所有的数据按照B列的顺序使C列与其相同排列起来 .如第一个排号是9,就将序号的9,以及姓名,成绩等全部排在第一行.排成:20070102009 9 9 谢芳 98 84 85 97 8320070102005 5 5 扬林 58 85 77
excel表格排序.让所有的数据按照B列的顺序使C列与其相同排列起来 .
如第一个排号是9,就将序号的9,以及姓名,成绩等全部排在第一行.
排成:
20070102009 9 9 谢芳 98 84 85 97 83
20070102005 5 5 扬林 58 85 77 56 98
.
就是让数据按我的规则排列就行了,
excel表格排序.让所有的数据按照B列的顺序使C列与其相同排列起来 .如第一个排号是9,就将序号的9,以及姓名,成绩等全部排在第一行.排成:20070102009 9 9 谢芳 98 84 85 97 8320070102005 5 5 扬林 58 85 77
打开vb编辑器,输入下如下代码:
注意:第三行的13,第四行的9是根据你表格最大行数和列数定的
Sub tt()
Const Row As Integer = 13
Const col As Integer = 9
Dim a(Row + 1,col + 1)
For i = 4 To Row
For j = 1 To col
temp = Cells(i,"B")
If j = 2 Then
a(i,j) = Cells(i,j)
Else
a(i,j) = Cells(temp + 4 - 1,j)
End If
Next j
Next i
For i = 4 To Row
For j = 1 To col
Cells(i,j) = a(i,j)
Next j
Next i
End Sub
运行,即可