EXCEL中编写一个“按照学号排列学生成绩”的宏
发布网友
发布时间:2022-05-21 09:54
我来回答
共1个回答
热心网友
时间:2023-10-22 20:00
这样的程序当然执行不了
假设sheet1表为成绩信息表,A列为学号,C列为空,sheet2表为学号表,A列为学号,B列为姓名
Sub abc()
n = 1
Do While Sheets(1).Cells(n, "A") <> ""
For i = 1 To Sheets(2).Range("A1").End(xlDown).Row
If Sheets(1).Cells(n, "A") = Sheets(2).Cells(i, "B") Then
Sheets(1).Cells(n, "C") = Sheets(2).Cells(i, "A")
Exit For
End If
Next i
n = n + 1
Loop
End Sub