☰

Excel 工作表中的标签

tag-icon • tag-icon microsoft-excel microsoft-word
Excel 工作表中的标签

我需要为文件制作标签，以显示学生姓名以及他们所在的 AP 班级。我有附加的 Excel 表可供使用，但我不知道如何在不手动输入所有标签的情况下执行此操作。

学生信息电子表格

答案1

您必须使用 VBA 用户定义函数UDF
在 Visual Basic Excel 中创建一个新模块（Alt + F11，插入模块）并将以下内容复制到其中：

公共函数 concatcell（Lookupvalue 作为字符串、LookupRange 作为范围、RowNumber 作为整数）
Dim i As Long
Dim J As Long
Dim Result 作为字符串
Result = ""
J = LookupRange.Columns.Count
For i = 1 To J
If LookupRange.Cells(RowNumber, i) = Lookupvalue Then
Result = Result & LookupRange.Cells(1, i) & " "
End If
Next i
concatcell = Result
End Function

现在，在文件数据末尾的新列中（示例中的 Ap World History 之后）写入以下内容：

=A2&" " &B2& " " &C2&" "&concatcell(1,$D$1:$AB2,ROW())

$D$1:$AB2 是前两行的范围，不包括姓氏（A）、名字（B）和年级（C），$ 用于修复一些引用，并在将公式向下拖动时让其他引用发生变化 A2
&B2&C2 用于连接 UDF 的结果
您可以向下拖动公式而不修改任何内容，它会自行更改
完成后复制结果列以及Paste Special Values您需要的位置Mail Merge Data

相关内容