如何使用 Excel 建立一个完整的单价子表？
身处数字化时代，我们对办公软件的要求早已不仅仅是数据处理，更希望它们能够满足在线协同共享、权限细化、流程审批自动化等一系列需求。而作为一款基于 B/S 架构的数据库系统，魔方网表可以将 Excel 文件变成在线网页数据库系统，完美地解决了这些
今天，我们就将带着大家一步步建立一个完整的单价子表，让你的数据管理更加高效、便捷。
为什么要建立单价子表？
单价子表是一个独立的用来存储商品或服务的单价信息。建立单价子表的好处显而易见：
1. 数据规范化：将单价信息从主表中分离出来，避免数据冗余，确保数据的一致性和准确性。
2. 易于维护：当单价发生变化时，只需更新子表中的相应记录，无需修改主表中的所有数据项。
3. 灵活扩展：随着业务的发展，可以轻松地向单价子表中添加新的单价信息，无需对主表结构进行任何修改。
如何创建单价子表？
在 Excel 中创建单价子表非常简单：
1. 新建一个工作表：在 Excel 中新建一个工作表，并根据需要对其命名，例如 "单价表"。
2. 插入数据：在工作表中插入两列，分别命名为 "名称" 和 "单价"。
3. 录入数据：在 "名称" 列中录入商品或服务名称，在 "单价" 列中录入相应的单价。
如何与主表关联？
创建好单价子表后，需要将其与主表关联起来，才能在主表中使用单价信息。关联方法如下：
1. 在主表中添加外键：在主表中添加一列，用于存储单价子表中的主键（通常是商品或服务 ID）。
2. 在单价子表中添加主键：在单价子表中添加一列，作为主键，并将其与外键列相匹配。
3. 建立关系：在 Excel 的 "数据" 选项卡中，点击 "关系" 按钮，添加一个新关系，将主表与单价子表关联起来。
关联成功后，主表中的外键列将与单价子表中的主键相匹配，从而实现数据关联。
如何使用单价子表？
关联好单价子表后，就可以在主表中使用单价信息了：
1. 使用 VLOOKUP 函数：在主表中，使用 VLOOKUP 函数查找单价子表中的单价。公式如下：
=VLOOKUP(商品或服务 ID, 单价子表!$A$1:$B$n, 2, FALSE)
其中，商品或服务 ID 是主表中的外键值，单价子表!$A$1:$B$n 是单价子表的数据范围。
2. 使用 CHOOSE 函数：如果单价子表比较小，也可以使用 CHOOSE 函数来查找单价。公式如下：
=CHOOSE(商品或服务 ID, 单价 1, 单价 2, 单价 3, )
其中，商品或服务 ID 是主表中的外键值，单价 1、单价 2、单价 3 是单价子表中的单价值。
如何自动更新单价子表？
为了保证单价子表信息的及时性和准确性，可以使用 Excel VBA 代码来自动更新单价子表。代码如下：
Private Sub 更新单价子表()
' 获取主表数据
Dim 主表数据 As Range
Set 主表数据 = ActiveWorkbook.Worksheets("主表").Range("B" & ActiveWorkbook.Worksheets("主表").Cells(ActiveWorkbook.Worksheets("主表").Rows.Count, "A").End(xlUp).Row)
' 获取单价子表数据
Dim 单价子表数据 As Range
Set 单价子表数据 = ActiveWorkbook.Worksheets("单价表").Range("B" & ActiveWorkbook.Worksheets("单价表").Cells(ActiveWorkbook.Worksheets("单价表").Rows.Count, "A").End(xlUp).Row)
' 循环主表数据，更新单价子表
For i = 2 To 主表数据.Rows.Count
' 获取商品或服务 ID
Dim 商品服务 ID As String
商品服务 ID = 主表数据.Cells(i, 1).Value
' 获取单价
Dim 单价 As Double
单价 = VLOOKUP(商品服务 ID, 单价子表数据, 2, FALSE)
' 更新主表数据
主表数据.Cells(i, 2).Value = 单价
Next i
' 保存工作簿
ActiveWorkbook.Save
End Sub
亲爱的读者，你是否已经学会如何在 Excel 中建立一个完整的单价子表了呢？欢迎你分享你的使用心得或提出新的问，我们一起交流学习。
