怎么设置excel表打编码物料就出来

要在Excel中设置表格，使得在输入物料编码时自动填出相应的物料信息，可以使用Excel的VLOOKUP函数、数据验证、以及一些格式化功能。步骤包括：建立物料信息表、定义数据区域、使用VLOOKUP函数进行查找、设置数据验证来限制输入。其中，VLOOKUP函数是实现这一功能的核心，接下来将详细展开。

一、建立物料信息表

在Excel中，首先需要创建一个包含物料编码及其详细信息的表格。假设在Sheet2中创建这个表格，包含以下几列：物料编码、物料名称、规格型号、单位、价格等。

创建物料信息表：
- 打开Excel，在Sheet2中创建一个新的表格。
- 在第一行输入列标题：物料编码、物料名称、规格型号、单位、价格。
- 在下面的行中输入每个物料的详细信息。

例如：

物料编码	物料名称	规格型号	单位	价格
M001	螺丝	10mm	个	0.5
M002	螺母	5mm	个	0.3
M003	垫片	12mm	个	0.2

二、定义数据区域

为了在其他表格中使用这些数据，需要定义数据区域名称，使得在公式中引用更加方便。

定义数据区域：
- 选中物料信息表格的所有数据区域（例如：Sheet2!A2:E100）。
- 在Excel的菜单栏中选择“公式”->“定义名称”。
- 在弹出的对话框中输入一个名称，例如“MaterialData”，并确认。

三、使用VLOOKUP函数进行查找

在Sheet1中，设置一个表格，用于输入物料编码并自动填充相应的物料信息。

设置输入表格：
- 在Sheet1中创建一个表格，包含以下几列：物料编码、物料名称、规格型号、单位、价格。
- 在A列输入物料编码，在B、C、D、E列中使用VLOOKUP函数自动填充相应的信息。
使用VLOOKUP函数：
- 在B2单元格输入公式：=VLOOKUP(A2, MaterialData, 2, FALSE)
- 在C2单元格输入公式：=VLOOKUP(A2, MaterialData, 3, FALSE)
- 在D2单元格输入公式：=VLOOKUP(A2, MaterialData, 4, FALSE)
- 在E2单元格输入公式：=VLOOKUP(A2, MaterialData, 5, FALSE)

这些公式的意思是：在MaterialData区域中查找A2单元格的值，并返回第2列（物料名称）、第3列（规格型号）、第4列（单位）、第5列（价格）的值。

四、设置数据验证来限制输入

为了确保输入的物料编码是有效的，可以使用数据验证功能。

设置数据验证：
- 选中A列中的所有单元格（例如：A2:A100）。
- 在Excel的菜单栏中选择“数据”->“数据验证”。
- 在“设置”选项卡中，选择“允许”下拉列表中的“自定义”。
- 输入公式：=ISNUMBER(MATCH(A2, MaterialData[物料编码], 0))
- 选择“输入信息”和“出错警告”选项卡，输入相应的提示信息，提醒用户输入有效的物料编码。

五、格式化表格

为了使表格更加美观，可以设置一些格式化选项。

设置表格样式：
- 选中整个表格区域。
- 在Excel的菜单栏中选择“开始”->“格式化为表格”，选择一种喜欢的样式。
- 设置列宽和行高，使表格内容更加清晰易读。
条件格式：
- 选中需要格式化的区域。
- 在Excel的菜单栏中选择“开始”->“条件格式”，设置一些条件格式规则，例如：高亮显示空白单元格、突出显示价格超过某个值的行等。

六、使用宏（可选）

如果对VBA有一定了解，可以编写一个宏来自动执行这些操作，进一步简化工作流程。

编写宏：
- 按下Alt+F11打开VBA编辑器。
- 在VBA编辑器中插入一个新模块，输入以下代码：

Sub FillMaterialInfo()
    Dim ws As Worksheet
    Dim dataWs As Worksheet
    Dim materialRange As Range
    Dim cell As Range
    Dim materialRow As Range
    Set ws = ThisWorkbook.Sheets("Sheet1")
    Set dataWs = ThisWorkbook.Sheets("Sheet2")
    Set materialRange = dataWs.Range("A2:E100")
    For Each cell In ws.Range("A2:A100")
        If cell.Value <> "" Then
            Set materialRow = materialRange.Find(cell.Value, , xlValues, xlWhole)
            If Not materialRow Is Nothing Then
                cell.Offset(0, 1).Value = materialRow.Offset(0, 1).Value
                cell.Offset(0, 2).Value = materialRow.Offset(0, 2).Value
                cell.Offset(0, 3).Value = materialRow.Offset(0, 3).Value
                cell.Offset(0, 4).Value = materialRow.Offset(0, 4).Value
            Else
                cell.Offset(0, 1).Value = "物料编码不存在"
                cell.Offset(0, 2).Value = ""
                cell.Offset(0, 3).Value = ""
                cell.Offset(0, 4).Value = ""
            End If
        End If
    Next cell
End Sub

运行宏：
- 返回Excel，按下Alt+F8打开宏对话框。
- 选择刚刚编写的宏“FillMaterialInfo”，点击“运行”。

通过以上步骤，就可以在Excel中设置一个表格，使得在输入物料编码时，能够自动填充相应的物料信息。这不仅提高了工作效率，还减少了人为错误的可能性。