主要观点总结
本文介绍了如何使用 VBA 在 Excel 中创建一个 XY 图表，并通过代码设置 X 轴和 Y 轴的标题。文章包含详细的步骤和代码示例。
关键观点总结
关键观点1: 文章主题
介绍如何使用 VBA 在 Excel 中创建 XY 图表，并设置坐标轴标题。
关键观点2: 代码详解
文章详细解释了 VBA 代码的运行过程，包括选择图表数据区域、选择图表显示区域、创建图表对象、设置图表的属性等。
关键观点3: 特色功能
文章展示了如何使用数据区域的第一列作为 X 轴标题，其他列作为两个系列的 Y 值，以及如何使用 Y 数据列上方的单元格作为 Y 轴标题和系列名称。
关键观点4: 学习资源推荐
文章推荐了优秀的图表知识学习站点 peltiertech.com ，并欢迎读者加入完美 Excel 社群进行技术交流和提问。
文章预览
学习Excel技术，关注微信公众号： excelperfect 标签： VBA ， Excel图表 XY 图表使用 X 和 Y 数据列顶部的标签作为坐标轴标题似乎不是内置功能，然而，可以使用 VBA 实现。 示例数据如下图 1 所示。 图 1 VBA 代码如下： Sub ChartWithAxisTitles() Dim objChart As ChartObject Dim myChtRange As Range Dim myDataRange As Range Dim myInitialRange As Range Dim sInitialRange As String If Not ActiveSheet Is Nothing Then If TypeName(ActiveSheet) = "Worksheet" Then If TypeName(Selection) = "Range" Then Set myInitialRange = Selection If myInitialRange.Cells.Count = 1 Then Set myInitialRange = myInitialRange.CurrentRegion End If sInitialRange = myInitialRange.Address( True , True ) End If With ActiveSheet On Error Resume Next Set myDataRange = Application.InputBox( _
………………………………
