Excel模板《供货企业自查表》功能详解与应用指南

本文还有配套的精品资源，点击获取

简介：《供货企业自查表》是一个功能丰富的Excel模板，用于帮助企业自动化自我检查流程，提高供应链管理的合规性和效率。模板包含基础数据输入、公式计算、条件格式化、数据验证、图表展示、数据透视分析等功能，支持宏和VBA编程扩展。同时，强调版本控制、保护共享和数据分析工具的使用，为企业提供了一套全面的自查解决方案。

1. Excel模板《供货企业自查表》（附件3）.zip综述

随着信息技术的快速发展，Excel已广泛应用于企业管理、数据分析、财务审计等多个领域，成为不可或缺的工具。今日，我们将要探讨的是Excel模板《供货企业自查表》（附件3）.zip，这是企业自我管理与检查的一个重要工具。它能有效地帮助供货企业进行自我检查、风险规避以及合规性管理。

本章内容我们将从一个全面的视角来认识这个自查表模板，从它的组成元素、功能特点到实际应用中的优势，我们将一一进行深入分析。首先，我们会介绍该模板的结构及其关键部分，然后讨论如何在实际工作中应用该模板以及它如何提升企业的运营效率和管理质量。最后，我们还将探讨这个模板在行业中的普及程度及潜在的优化方向。通过本章的学习，读者应能对Excel模板《供货企业自查表》有全面的理解，并能在实际工作中灵活运用。

2. Excel基础功能应用

2.1 工作表与单元格操作

2.1.1 熟悉工作表的基本操作

工作表是Excel中的一个组成部分，用于存储、组织和处理数据。理解工作表的基本操作对于高效使用Excel至关重要。首先，通过"新建工作表"可以创建新的数据页面，而"重命名工作表"则有助于我们通过更具描述性的名称来管理多个工作表。删除工作表的步骤简单直接，但需注意，删除后的工作表将无法恢复。工作表的移动或复制可以通过拖动的方式轻松完成，而在工作表之间切换则通过标签快速实现。

为了提高数据输入和查看的便捷性，"隐藏工作表"和"取消隐藏工作表"功能可以让我们在需要时专注于重要数据。隐藏工作表可以防止数据被意外修改，而取消隐藏操作则使得数据再次可访问。通过这些操作，用户可以灵活地管理自己的工作簿，提高工作效率。

2.1.2 掌握单元格的选择、编辑及格式设置

单元格是Excel数据输入的基本单位，对其进行选择、编辑和格式设置是日常操作的核心。选择单元格是数据处理的第一步，无论是单个单元格还是多个连续或不连续的单元格。掌握快捷键 Ctrl + A 选择所有单元格，或使用鼠标拖拽，都是提高工作效率的好方法。

编辑单元格内容则涉及到输入文本、数字或日期等数据，必要时还需使用编辑功能对数据进行修改和删除。当数据量大时，格式化是让数据更加易于阅读和分析的重要步骤。通过设置字体、颜色、边框、填充和对齐等属性，可以使工作表中的数据呈现得更加清晰和专业。在格式设置中，条件格式化功能可以帮助我们根据数据的值自动调整其显示样式，这将在后续章节中详细讨论。

2.2 文本与数字的处理

2.2.1 文本的输入、编辑及格式化技巧

在Excel中处理文本是一项基本且重要的技能。文本的输入可以直接在单元格中完成，输入完成后，可以通过编辑功能对文本进行修改、剪切、复制和粘贴。文本格式化包括设置字体、大小、颜色、对齐方式、文本方向和文本效果等。合理利用文本格式化，可以使工作表中的文本信息更加醒目和易于理解。

使用合并单元格功能，可以将相邻的多个单元格合并为一个单元格，这对于标题或某些需要跨行显示的文本非常有用。然而，需要注意的是，在对包含合并单元格的工作表进行某些操作时，可能会出现异常，因此在使用前应仔细规划。Excel中还包含了大量的文本函数，如 LEFT 、 RIGHT 、 MID 、 CONCATENATE 等，这些函数对于文本的提取、连接以及条件处理非常有帮助。

2.2.2 数字数据的输入、格式化与数值计算

在Excel中，数字数据不仅包括整数和小数，也包括日期和时间等特殊的数值类型。对于数字数据的输入，需要特别注意数字格式的设置。在Excel中，可以通过“设置单元格格式”对话框来定义数字的显示方式，例如货币、百分比、分数等。这样的格式化处理不仅让数据看起来更直观，还有助于避免在处理大量数据时的错误解读。

Excel内置了强大的数值计算功能，包括基本的四则运算以及各种数学函数和财务函数。用户可以通过输入公式来实现复杂的数学计算，例如使用 SUM 求和、 AVERAGE 求平均值、 PI 获取圆周率值等。为了保证数值计算的准确性和有效性，利用单元格引用将数据连接起来进行计算也是一个常见的做法。在复杂的计算中，公式审核工具可帮助检查公式正确性以及跟踪公式中的错误。

具体操作示例

下面是使用Excel进行基本单元格操作和文本数字处理的简单示例。

单元格基本操作

选择A1到C3区域的单元格，并设置字体为Arial，字号为12，颜色为深蓝：

1. 单击A1单元格，按住左键并拖动到C3单元格。
2. 在“开始”选项卡中选择“字体”下拉列表，选择Arial字体。
3. 点击“字号”下拉列表，选择12号字。
4. 点击字体颜色图标，选择蓝色系中的深蓝。

文本输入和格式化

在D1单元格输入文本“产品名称”，并设置文本格式为粗体：

1. 单击D1单元格并输入“产品名称”。
2. 在“开始”选项卡中，点击加粗按钮。

数字数据格式化

将E2单元格的数据格式设置为百分比形式：

1. 单击E2单元格。
2. 在“开始”选项卡中，点击“数字”下拉列表，选择百分比格式。

数值计算

在F2单元格使用公式计算E2单元格数据的10%值：

1. 单击F2单元格。
2. 输入公式“=E2*0.1”，然后按Enter键。

通过上述操作，我们可以掌握Excel中处理文本和数字数据的基本技能，为后续更复杂的Excel操作打下坚实的基础。

3. 公式与函数统计分析

3.1 公式的编写与应用

3.1.1 基本数学运算和逻辑运算公式的使用

在Excel中，公式是构成工作表动态性的基础。它们允许我们对单元格中的数据进行操作，从而自动计算结果。要开始使用公式，首先需要了解基本的数学运算符，包括加（+）、减（-）、乘（*）、除（/）以及百分比（%）。例如，若要计算A1和B1两个单元格的和，可以在任意单元格中输入 =A1+B1 。

除了数学运算，逻辑运算也是日常使用中不可或缺的一部分。逻辑运算符主要包括 AND 、 OR 和 NOT ，它们可以帮助我们在公式中处理条件判断。例如， =IF(AND(A1>100, B1<50), "Pass", "Fail") 这个公式会检查A1是否大于100且B1是否小于50，如果两个条件都满足，返回"Pass"，否则返回"Fail"。

3.1.2 公式审核工具的运用与错误检查

随着工作表的复杂性增加，公式中出现错误是在所难免的。幸运的是，Excel提供了强大的公式审核工具帮助我们定位和修正错误。

• 追踪箭头 ：可以追踪单元格之间的直接和间接引用，这对于理解复杂公式中的数据流向非常有用。
• 错误检查器 ：这个工具可以自动检测公式中的错误，并提供可能的解决方案。
• 公式求值器 ：允许我们逐步检查公式中的每个部分，观察结果的变化。

例如，假设我们有一个公式 =A1/B1 ，如果B1的值为0，Excel会显示错误 #DIV/0! 。这时，我们可以通过公式审核工具中的错误检查器找到这个错误，并通过添加适当的错误处理（如使用 IFERROR 函数）来修正它。

=IFERROR(A1/B1, "Error: Division by zero")

通过上述步骤，我们不仅能够使用基本的数学和逻辑公式，还能够熟练运用公式审核工具来保证数据的准确性和可靠性。

3.2 函数的高级应用

3.2.1 日期和时间函数的使用

Excel中的日期和时间函数是进行时间序列分析和数据处理不可或缺的工具。它们可以对日期和时间进行操作、计算以及格式化。

• DATE 函数可以根据年、月、日的参数生成日期。
• TODAY 函数可以返回当前日期，常用于创建动态日期。
• NOW 函数则返回当前的日期和时间。
• DATEDIF 函数用来计算两个日期之间的差异。
• YEAR 、 MONTH 和 DAY 函数可以分别提取日期中的年、月、日部分。

=DATE(2023, 12, 25) // 返回2023年12月25日
=TODAY()            // 返回当前日期
=NOW()              // 返回当前的日期和时间
=DATEDIF("2023-01-01", "2023-12-31", "Y") // 计算两个日期之间的完整年数

掌握日期和时间函数能够帮助我们在处理诸如财务报表、项目时间线以及日程规划等多种场景中更加高效。

3.2.2 查找与引用函数、统计函数的综合运用

查找和引用函数是处理表格数据时的关键部分，它们可以帮助我们定位数据并进行提取或对比。统计函数则用于进行数据集合的分析和计算，是数据分析中经常用到的工具。

• VLOOKUP 和 HLOOKUP 函数可以在表格中垂直或水平查找特定的数据。
• INDEX 和 MATCH 函数可以提供更灵活的数据查找能力。
• COUNTIF 和 SUMIF 系列函数能够根据给定的条件计算满足条件的单元格数量或总和。

=VLOOKUP("John", A1:B10, 2, FALSE) // 在A1:B10范围查找"John"，返回对应的第二列的值
=INDEX(C1:C10, MATCH("John", A1:A10, 0)) // 返回A1:A10中"John"所在行的C列值
=COUNTIF(A1:A10, ">25")             // 计算A1:A10范围内大于25的单元格数量

结合查找引用函数和统计函数，可以实现复杂的数据查询和分析任务。这些函数在制作报告、管理销售数据和进行市场分析等场景中都有广泛应用。

4. 条件格式高亮数据

4.1 条件格式的基本操作

4.1.1 理解条件格式的概念及其作用

条件格式是Excel中的强大功能，允许用户根据数据的特性来设定格式，使数据在满足特定条件时自动以特定的方式显示。这种方式极大地提高了数据的可读性和识别性。通过应用条件格式，用户可以直观地识别出数据集中的关键信息，比如异常值、高于或低于平均值的数值、数据范围等。

例如，在处理销售数据时，可以使用条件格式来高亮显示销售量超过某个阈值的单元格。这样，在大量数据中，这些重要信息将直接跳入眼帘，帮助决策者快速做出反应。

4.1.2 掌握不同类型条件格式的设置方法

在Excel中，条件格式可以根据单元格的值、公式或数据条等设置。通常，可以通过选择单元格或单元格区域，然后点击“开始”菜单中的“条件格式”按钮来访问这些选项。

• 基于单元格值的格式设置是最直观的方式，包括数值、文本内容、日期等条件的设置。
• 公式条件格式通过用户定义的公式来决定格式，这为条件格式的应用提供了极大的灵活性。
• 数据条、色阶和图标集等视觉辅助工具可以帮助用户更直观地看到数据分布和比较。

以下是一个设置基于单元格值的条件格式的代码示例，假设我们要高亮显示A1:A10范围内数值大于100的单元格：

Sub HighlightLargeValues()
    With Range("A1:A10")
        .FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:=100
        .FormatConditions(.FormatConditions.Count).SetFirstPriority
        With .FormatConditions(1).Interior
            .Color = RGB(255, 255, 0)  ' 设置高亮颜色为黄色
            .Pattern = xlSolid
        End With
    End With
End Sub

在上述代码中，我们首先选定了A1:A10的区域，然后添加了一个条件格式规则，该规则会检查单元格值是否大于100。如果是，就将单元格背景设置为黄色。这只是条件格式中众多选项之一，实际应用中，可以根据需求灵活搭配使用。

4.2 高级条件格式技巧

4.2.1 使用公式设置条件格式

使用公式可以创建更加动态和复杂的条件格式规则。公式条件格式允许用户根据单元格中的值以及上下文信息来设置格式。例如，如果我们要根据单元格的值与相邻单元格值的关系来设置条件格式，可以这样做：

Sub HighlightCellsBasedOnNeighboringCells()
    With Range("B2:B11")
        .FormatConditions.Add Type:=xlExpression, Formula1:="=$B2>$A2"
        .FormatConditions(.FormatConditions.Count).SetFirstPriority
        With .FormatConditions(1).Interior
            .Color = RGB(255, 0, 0)  ' 如果B2单元格的值大于A2单元格的值，则为红色背景
            .Pattern = xlSolid
        End With
    End With
End Sub

在这个例子中，我们比较了B2单元格和A2单元格的值。如果B2大于A2，则将B2单元格的背景颜色设置为红色。这个逻辑将自动应用到B2到B11的范围内的每个单元格上。

4.2.2 条件格式在数据监控中的应用实例

在数据监控的场景下，条件格式特别有用。假设我们负责监控一组服务器的运行状态。我们可以设置条件格式来实时显示服务器状态，当服务器状态出现异常时，相关的单元格可以立即改变颜色，从而引起注意。

例如，如果单元格A1中包含的是服务器状态信息，并且我们定义“Up”表示正常，“Down”表示异常，我们可以设置条件格式如下：

Sub HighlightServerStatus()
    With Range("A1:A10")
        .FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, Formula1:="Down"
        .FormatConditions(.FormatConditions.Count).SetFirstPriority
        With .FormatConditions(1).Interior
            .Color = RGB(255, 0, 0)  ' 如果服务器状态为Down，则背景变为红色
            .Pattern = xlSolid
        End With
    End With
End Sub

通过上述代码，当A1到A10的某个单元格的值变为“Down”时，该单元格就会自动变为红色，从而提醒监控人员服务器出现了问题。这种实时反馈机制是条件格式在数据分析、监控等领域得到广泛应用的重要原因。

条件格式是Excel中的一个功能强大的工具，通过上述介绍的技巧和实例，我们可以看到它在数据可视化的实际应用中发挥了多么重要的作用。

5. 数据验证确保输入准确

5.1 数据验证规则的创建与应用

5.1.1 熟悉数据验证的基本规则

数据验证是Excel中一项非常实用的功能，它允许用户为单元格或单元格区域设置一系列条件，以确保输入到这些单元格的数据满足特定的要求。这样可以有效地避免错误数据的输入，提高数据的准确性和可信度。

在Excel中，数据验证通常有以下几种类型：

• 整数、小数、日期、时间、文本长度和自定义数值等。
• 下拉列表选项，用于限制只能从预设的几个选项中选择输入值。
• 条件公式，允许基于其他单元格的值来动态决定验证规则。

5.1.2 实现数据的输入限制和提示

数据验证不仅可以限制输入的数据类型和范围，还可以通过设置输入提示和错误警告来指导用户正确输入数据。

• 输入提示 ：当用户选中设置了数据验证的单元格时，会弹出一个对话框显示输入提示信息。这对于指示用户输入何种类型的数据非常有用。
• 错误警告 ：当用户输入不符合验证条件的数据时，会弹出一个警告对话框。这可以帮助用户识别并更正错误。

实例分析：数据验证规则的创建与应用

假设我们有一个产品库存表，我们需要确保用户只能输入合法的产品数量（如必须为正整数）。

1. 选中需要应用数据验证的单元格区域（比如B2:B100）。
2. 在Excel的"数据"选项卡中，点击"数据验证"按钮。
3. 在"设置"标签下，选择"整数"，并设置数据验证的规则。我们这里设置最小值为1。
4. 在"输入信息"标签下，填写"标题"和"输入信息"，如输入"产品数量"和"请输入1以上的整数"。
5. 在"错误警告"标签下，选择"停止"作为样式，并填写"错误标题"和"错误信息"，比如"输入错误！"和"请输入一个有效的产品数量"。

这样，当用户在该区域输入数据时，就会自动弹出输入提示，如果输入了非整数或者小于1的值，则会显示错误警告并阻止输入。

5.2 数据验证的进阶技巧

5.2.1 自定义验证规则与错误警告

为了进一步提高数据输入的准确性，我们可以使用Excel的公式来创建自定义的数据验证规则。这允许我们基于更复杂的逻辑来限制用户输入，比如条件公式可以引用其他单元格的值作为验证依据。

例如，如果你有一个产品列表，你希望根据产品类型单元格（假设为A列）的不同来调整库存单元格（假设为B列）的数据验证规则。

=AND(ISNUMBER(B2), B2 >= 0, IF(A2="电子产品", B2 <= 100, IF(A2="家居用品", B2 <= 50, TRUE)))

这段公式的意思是，当B列的值为数字、大于等于0且小于等于100时，如果A列的值为"电子产品"；当B列的值为数字、大于等于0且小于等于50时，如果A列的值为"家居用品"。如果B列的值不满足这些条件，就会触发错误警告。

5.2.2 数据验证在数据分析中的高级应用

数据验证不仅可以在单个工作表中使用，还能在多个工作表或工作簿之间进行交互。例如，我们可以通过数据验证引用其他工作表的单元格作为下拉列表的选项，或者根据其他工作表中的数据动态改变当前工作表的数据验证规则。

例如，假设有一个工作簿包含了多个产品类别的数据，每个产品类别的数据在不同的工作表中。我们可以在一个汇总工作表中使用数据验证来引用这些工作表的数据。

=OFFSET(INDIRECT(INDIRECT("'产品类别'!"&ADDRESS(2,1))), 1, 0, COUNTA(INDIRECT("'产品类别'!"&ADDRESS(2,1)&":"&ADDRESS(100,1))), 1)

这里使用了 OFFSET 和 COUNTA 函数结合 INDIRECT 函数来动态引用从工作表"产品类别"的A2单元格开始到A100单元格的单元格范围内的数据作为下拉列表的选项。

在Excel中灵活应用数据验证的进阶技巧，能够有效地提高数据的准确性和工作效率，对于数据质量的控制来说是一个非常有价值的工具。

6. 图表和图形数据展示

6.1 图表类型的选择与创建

图表是数据可视化的重要手段，它能将复杂的数据集转化为容易理解的图形，使非专业人员也能够快速把握信息的核心内容。正确选择并创建图表类型是展示数据的第一步。

6.1.1 理解不同图表类型的特点和适用场景

在Excel中，根据数据关系的不同，有多种图表类型可供选择，包括柱状图、折线图、饼图、散点图、条形图等。每种图表类型都有其独特的用途。

• 柱状图 ：适用于比较类别间的大小，如不同产品的销售量对比。
• 折线图 ：适合展现数据随时间变化的趋势，如股票价格随时间的波动。
• 饼图 ：用于展示各部分占总体的比例关系。
• 散点图 ：用于观察两个变量之间的关系，如市场研究中的消费者满意度与价格的关系。
• 条形图 ：与柱状图类似，但更适合于显示大量分类，尤其当分类的名称太长无法清晰显示时。

理解每种图表的特点，根据数据的性质和分析的目标选择合适的图表类型是数据可视化设计的第一原则。

6.1.2 创建标准图表并进行个性化设置

创建图表相对简单。在Excel中选中数据，点击“插入”选项卡，选择合适的图表类型即可快速创建一个基本图表。然而，为了更好地展示信息，我们还需要进行一些个性化设置。

• 图表样式 ：选择不同的图表样式和颜色组合，让图表看起来更加专业和美观。
• 数据标签 ：添加数据标签，让图表的读者可以直接读取具体数值。
• 图例和标题 ：添加图例和标题，明确图表所表达的信息。
• 轴刻度和网格线 ：调整轴刻度和添加网格线，以帮助更精确地读取数据点。

以下是一个创建柱状图并进行个性化设置的简单代码示例：

Sub CreateCustomizedBarChart()
    ' 定义图表数据区域
    Dim chartData As Range
    Set chartData = Sheet1.Range("A1:B5")
    ' 创建柱状图
    Dim cht As Chart
    Set cht = Charts.Add
    With cht
        .SetSourceData Source:=chartData
        .ChartType = xlColumnClustered ' 设置为簇状柱形图
        .HasTitle = True
        .ChartTitle.Text = "产品销售对比"
        ' 添加数据标签
        .SeriesCollection(1).ApplyDataLabels
        .SeriesCollection(1).DataLabels.Format.TextFrame2.TextRange.Font.Size = 10
        ' 设置轴标题
        .Axes(xlCategory, xlPrimary).HasTitle = True
        .Axes(xlCategory, xlPrimary).AxisTitle.Text = "产品"
        .Axes(xlValue, xlPrimary).HasTitle = True
        .Axes(xlValue, xlPrimary).AxisTitle.Text = "销售额（千单位）"
    End With
End Sub

通过以上代码，在Excel中创建了一个带有个性化设置的柱状图，如图所示：

+--------------------------------------------------+
| 产品销售对比                                     |
+--------------------------------------------------+
| [产品]       | [销售额（千单位）]                 |
| 产品A        | ￥50,000                          |
| 产品B        | ￥70,000                          |
| 产品C        | ￥45,000                          |
| 产品D        | ￥60,000                          |
+--------------------------------------------------+

6.2 图形元素的综合运用

6.2.1 利用形状、图片和智能艺术图形增强视觉效果

除了标准的图表类型，Excel还提供了丰富的图形元素来增强数据的视觉展示效果。使用形状、图片以及智能艺术图形可以制作更为专业和吸引眼球的报告。

• 形状 ：Excel提供了大量的形状，可以用来突出显示关键数据或创建图形上的注释。
• 图片 ：将相关的图片插入到工作表中，可以为数据提供更直观的背景信息。
• 智能艺术图形 ：使用智能艺术图形可以创建层次分明的组织结构图、流程图等。

下面是一个如何在Excel中使用形状来强调数据点的示例：

Sub HighlightDataWithShapes()
    ' 在图表中添加一个矩形形状
    Dim shp As Shape
    Set shp = Sheet1.Shapes.AddShape(msoShapeRectangle, 200, 100, 100, 50)
    ' 设置形状的填充颜色和边框样式
    With shp.Fill
        .Solid
        .Color = RGB(255, 255, 0) ' 黄色
    End With
    With shp.Line
        .Weight = 2
        .Color = RGB(0, 0, 0) ' 黑色
    End With
    ' 将形状置于数据点上方
    shp.ZOrder msoBringToFront
End Sub

6.2.2 图形与数据联动的高级技巧

要使图形元素与数据联动，可以采用以下高级技巧：

• 形状数据标签 ：在形状上添加数据标签，当数据更新时，标签也会同步更新。
• 条件格式图形 ：使用条件格式化设置，当数据满足特定条件时，改变图形元素的样式，如改变颜色或形状。

以下是一个示例，展示如何使用条件格式使形状的颜色与单元格数据联动变化：

Sub ConditionalShapeColoring()
    ' 定义目标单元格
    Dim targetCell As Range
    Set targetCell = Sheet1.Range("B2")
    ' 清除已有的形状和格式规则
    Sheet1.Shapes("Shape1").Delete
    ActiveSheet出局conditional格式规则
    ' 创建一个矩形形状并设置条件格式规则
    Dim shp As Shape
    Set shp = Sheet1.Shapes.AddShape(msoShapeRectangle, 200, 150, 50, 30)
    With ActiveSheet出局conditionalFormats
        .Add Type:=xlCellValue, Operator:=xlLess, Formula1:="100"
        .SetFirstPriority
        With .FormatConditions(1)
            .Interior.Color = RGB(255, 0, 0) ' 红色
            .StopIfTrue = False
        End With
    End With
End Sub

通过这些技巧，可以实现Excel数据展示的高级可视化，更好地与观众沟通数据背后的故事。

7. 数据透视表分析汇总

数据透视表是Excel中一种强大的数据分析工具，它允许用户快速组织和汇总大量数据，并提供交互式的数据探索方式。本章将深入探讨数据透视表的基础构建和高级功能，帮助你更高效地进行数据汇总分析。

7.1 数据透视表基础构建

数据透视表非常适合用于处理大量数据集，尤其在需要快速变换数据视图和生成报告时。

7.1.1 理解数据透视表的作用和优势

数据透视表的核心优势在于它的灵活性和强大的数据分析能力。其作用主要包括：

• 快速汇总数据 ：通过拖放字段，用户可以迅速对数据进行分组和汇总。
• 交互式数据分析 ：数据透视表允许用户通过简单的点击来更改数据的布局，查看不同数据视图。
• 支持多维度分析 ：可以同时在行、列和数据区域进行多维度的数据汇总。

7.1.2 创建基本的数据透视表并进行数据汇总分析

要创建一个基本的数据透视表，按照以下步骤操作：

1. 选择包含数据的范围，并确保数据区域没有空行或空列。
2. 点击“插入”选项卡，选择“数据透视表”。
3. 在弹出的对话框中，选择数据透视表的位置（新工作表或现有工作表），点击“确定”。

下面的示例代码展示了如何使用VBA来创建数据透视表：

Sub CreatePivotTable()
    Dim pc As PivotCache
    Dim pt As PivotTable
    Dim sht As Worksheet
    Dim rng As Range
    Dim pth As String
    pth = ActiveWorkbook.FullName
    Set sht = ActiveSheet
    Set rng = sht.Range("A1:D100") ' 设定数据范围
    ' 创建数据透视缓存
    Set pc = ActiveWorkbook.PivotCaches.Create( _
        SourceType:=xlDatabase, _
        SourceData:=rng)
    ' 在新工作表中创建数据透视表
    Set pt = pc.CreatePivotTable( _
        TableDestination:=sht.Range("F1"), _
        TableName:="MyPivotTable")
    ' 添加字段到数据透视表的区域
    With pt
        .PivotFields("Category").Orientation = xlRowField
        .PivotFields("Category").Position = 1
        .PivotFields("Sum of Sales").Orientation = xlDataField
        .PivotFields("Sum of Sales").Function = xlSum
        .PivotFields("Sum of Sales").Position = 1
    End With
End Sub

通过以上步骤，我们已经完成了基础数据透视表的创建，并在其中添加了行字段和数据字段。接下来，我们将深入探讨如何利用数据透视表进行更复杂的分析。

本文还有配套的精品资源，点击获取

简介：《供货企业自查表》是一个功能丰富的Excel模板，用于帮助企业自动化自我检查流程，提高供应链管理的合规性和效率。模板包含基础数据输入、公式计算、条件格式化、数据验证、图表展示、数据透视分析等功能，支持宏和VBA编程扩展。同时，强调版本控制、保护共享和数据分析工具的使用，为企业提供了一套全面的自查解决方案。

本文还有配套的精品资源，点击获取